|
Registriert seit: 22. Jan 2008
Ort: Erfurt
958 Beiträge
Delphi 7 Enterprise
|
Re: Anfängerfrage IF - THEN - ELSE
1. Mär 2008, 17:12
hi,
Delphi-Quellcode:
procedure TForm1.Taste2Click(Sender: TObject);
begin
if not Form1.ADOConnection1.Connected then
begin
messageDlg('Noch nicht mit der Datenbank verbunden.',mtError,[mbOK],0);
exit;
end else (*Deine Befehle*) ;
Gruss Kaki
Repeat Until true=false;
|