Entwickler-Ecke
Delphi Language (Object-Pascal) / CLX - CaseStr
hansa - Mi 23.07.03 20:47
Titel: CaseStr
Hi,
hier ist noch was für den FAQ Beitrag mit dem CaseStr. Da kann ich ja nichts hinschreiben. Das macht fast dasselbe. Oder doch nicht ? Ich brauche nur diese Prozedur gar nicht.
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
| procedure TForm1.FormCreate(Sender: TObject);
const str : ARRAY [1..3] of string = ('str1','str2','str3');
var i : integer;
Begin
i := 2;
Case i of
0: ShowMessage('Str1');
1: ShowMessage('Str2');
2: ShowMessage('Str2');
Else
ShowMessage('Keine übereinstimmung gefunden!');
End;
end; |
Tino - Do 24.07.03 09:37
Hallo!
Wie, wo, was? Hast du jetzt eine Frage oder ist das ein FAQ Beitrag oder was genau?
Gruß
Tino
maxk - Do 24.07.03 20:50
Ich glaube das soll eine Bemerkung zu einem FAQ sein. Kann man ja leider nicht antworten - ist gut so :wink:
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!