Mail.ruПочтаМой МирОдноклассникиВКонтактеИгрыЗнакомстваНовостиКалендарьОблакоЗаметкиВсе проекты

Для чего служит FormCreate?

Артем Ракитин Ученик (177), на голосовании 11 лет назад
Вот часть кода:
procedure TForm1.FormCreate(Sender: TObject);

var s: string;

begin

s:=ExtractFilePath(Application.ExeName);

dbSource.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;Data
Source='+s+

'1.mdb;Persist
Security Info=False';

dbDest.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;Data
Source='+s+

'2.mdb;Persist
Security Info=False';

ci:=-1;

dbSource.Connected:=True;

dbDest.Connected:=True;

end;
Голосование за лучший ответ
Sergey Ser Мастер (1056) 11 лет назад
Во время запуска приложения происходит создание формы (FormCreate), в код от begin до end выполняется подключение к файлам ацесовской базы данных, файлы находятся в папке с ЕХЕ
Άηϑρέΰ ҂ Искусственный Интеллект (180095) 11 лет назад
если по вопросу: то при создании самой формы перед ее отображением
Похожие вопросы