Registriert seit: 15. Dez 2004
Ort: Dillingen
38 Beiträge
Delphi 7 Professional
|
Re: Was ist hier falsch?
6. Jan 2005, 18:13
Versuchs mal so :
Delphi-Quellcode:
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, EDBComboBox, EDB, EDB_const;
type
TForm1 = class(TForm)
Memo1: TMemo;
EDB1: TEDB;
EDBComboBox1: TEDBComboBox;
Daten: TButton;
procedure FormCreate(Sender: TObject);
private
{ Private-Deklarationen }
public
{ Public-Deklarationen }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.FormCreate(Sender: TObject);
begin
if EDB1.CreateDBConnection then
begin
{tu was}
end
end;
end.
|
|
Zitat
|