Syntaxproblem, bitte um Hilfe

[Kedariodakon]

lieber net

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.

Lieber So!

bye