/  
 ДОКУМЕНТІВ 
20298
    КАТЕГОРІЙ 
30
Про проект  Рекламодавцям  Зворотній зв`язок  Контакт 

Створення клієнтської програми для користування базою данних MS ACCESS в Delphi 4.0, Детальна інформація

Тема: Створення клієнтської програми для користування базою данних MS ACCESS в Delphi 4.0
Тип документу: Реферат
Предмет: Комп`ютерні науки
Автор: фелікс
Розмір: 0
Скачувань: 863
Скачати "Реферат на тему Створення клієнтської програми для користування базою данних MS ACCESS в Delphi 4.0"
Сторінки 1   2   3   4   5   6   7   8  
CalendarForm.Close; // закриваємо форму

end;

В модуль slave.dpr введемо наступний текст:

uses

Forms,

SysUtils,

Classes,

cal in 'cal.pas' {CalendarForm};

function GetDate: TDateTime; stdcall;

begin

Application.CreateForm(TCalendarForm, CalendarForm); // динамічно створюємо форму

CalendarForm.ShowModal; // виводимо форму на екран

GetDate:=selDate;// значенню що повертає функція присвоюємо значення вибраної дати

end;

exports

GetDate; // функція для зовнішнього використання

begin

end.

Так як для більшої швидкості виконання програми, форми створюються динамічно, то відповідно в властивостях проекта (Projects \xF0DE Properties) потрібно забирати форми з поля “AutoCreate Forms”.

Для SpeedButton1 i SpeedButton2 в основній програмі, в процедуру обробки події OnClick вставимо наступний текст:

procedure TForm1.SpeedButton1Click(Sender: TObject);

begin

DBEdit1.Text:=DateToStr(GetDate);

end;

procedure TForm1.SpeedButton2Click(Sender: TObject);

begin

DBEdit2.Text:=DateToStr(GetDate);

end;

Відповідно перед секцією Implementation вставимо наступне:

{export from slave.dll}

Сторінки 1   2   3   4   5   6   7   8  
Коментарі до даного документу
Додати коментар