Forum: Object-Pascal / Delphi-Language
Delphi
by alcaeus,
26. Aug 2004
Hi Äfan!
Die einzige Lösung die ich zur Zeit parat habe ist der with-do-Block:
with Variable do
begin
if Name = '' then
ShowMessage('Hallo!');
if Alter = 16 then
ShowMessage('Ok!');
Forum: Object-Pascal / Delphi-Language
Delphi
by alcaeus,
26. Aug 2004
Hi Äfan!
Ich versteh deine frage nicht ganz... Meinst du wie z.B. if-then-else oder so etwas wie die case of-Abfrage?
Greetz
alcaeus
Forum: Object-Pascal / Delphi-Language
Delphi
by alcaeus,
26. Aug 2004
Hi Äfan!
Erstens mal den Code mit delphi formatiert und mit einrückungen:
procedure TfrmLogin.LoginOKClick(Sender: TObject);
begin
If LoginName.Text = '' then
MessageDlg('Bitte geben Sie einen Namen ein', mtInformation, , 0)
end;
begin
If not LoginName.Text = '' then