Entwickler-Ecke
Sonstiges (Delphi) - LAteinprogramm
Niemand2007 - Mi 19.04.06 07:02
Titel: LAteinprogramm
Ich brauch hilfe bei einem lateinprogramm das ich selber Programmiere(bin Anfänger). Also bei mir ist edit fenster und ein button und ein label. Ich will das nur wenn das Wort "venire" in edit eingegeben wird im label steht Korrekt. Und wenn das Wort anders heißt das im label steht Falsch!
der Berliner - Mi 19.04.06 07:27
Hallo
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
| procedure TForm1.Button1Click(Sender: TObject);
begin
if Edit1.Text<>'Venire' then
begin
Label1.Caption:='Falsch';
end
else Label1.Caption:='Korrekt';
end; |
Veni,Vedi,Veci :wink:
Gruß
Niemand2007 - Mi 19.04.06 09:11
vielen vielen danke!!!! Super echt perektes Forum!!! 1A
und noch ne frage ganz nebenbei!!! Ich will da so einen button machen "Next" der soll das alles wieder auf neu zurücksetzen bloß ein anderes wort!
Delete - Mi 19.04.06 10:08
Delphi-Quelltext
1:
2:
3:
4:
5:
| procedure NextBtnclick(Sender: tobject);
begin
Edit1.text := '';
Label1.Caption := '';
end; |
danach checkst du einfach auf ein anderes Wort, wie der Quelltext unten
der Berliner - Mi 19.04.06 10:10
Na..nen bischen drüber nachdenken und dann
Delphi-Quelltext
1:
2:
3:
4:
5:
| procedure TForm1.Button1Click(Sender: TObject);
begin
Edit1.text:='';
Label1.Caption:='';
end; |
Edit: oops zu langsam :(
Delete - Mi 19.04.06 10:33
hier mal ein beispiel was ich eben mal gemacht habe...
Delete - Mi 19.04.06 10:51
habs nochmal aktualisiert. Mit fehlerauswertung jetzt...
Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2026 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!