Hallo,
warum nicht einfach so:
Delphi-Quellcode:
var
S: String;
begin
//Text auslesen und Kleinbuchstaben daraus machen
S := lowercase(Edit1.Text);
Panel1.Visible := S = 'blume';
Panel2.Visible := S = 'tiger';
Panel3.Visible := S = 'wasser';
end;
Der Vorteil dabei von lowercase ist, dass man nicht auf die Groß-/Kleinschreibung bei der Eingabe achten muss.
mfg
Helmi
>> Theorie ist Wissen, dass nicht funktioniert - Praxis ist, wenn alles funktioniert und keiner weiss warum! <<