Zitat:
Ich wollte mal fragen wieso der Quelltext nicht klappt?
dann wöllt ich mal fragen was nicht funktioniert
und was soll passieren, bzw. wie soll es funktionieren
if edit1.text = 'test' then // ok (Text ist 'test')
if edit1.text <> 'test' then // nö (Text ist nicht 'test')
Delphi-Quellcode:
if edit1.text = 'test' then
begin
// ok (Text ist 'test')
end
else if edit1.text <> 'test' then
begin
// nö (Text ist nicht 'test')
end;
Delphi-Quellcode:
if edit1.text = 'test' then
begin
// ok (Text ist 'test')
end
else // kommt eh nur hier her, wenn edit1.text nicht '' ist (also <> )
begin
// nö (Text ist nicht 'test')
end;
[
ot]
@hoika: ich schreib da gen mal schön kurz
Delphi-Quellcode:
Begin
If Edit1.Text = 'test' Then Begin
ListBox2.Visible := True;
ListBox2.Enabled := True;
End Else Showmessage('Fehler');
End;
ist aber, wie du schon sagtes Ansichtssache,
[/
ot]
allerdings das mit der Formatierung könntest du (@Thomas) dir gern mal angewöhnen ... hat man auch viel mehr Überlick so ^^