Einzelnen Beitrag anzeigen

Hansa

Registriert seit: 9. Jun 2002
Ort: Saarland
7.554 Beiträge
 
Delphi 8 Professional
 
#7
  Alt 10. Mai 2003, 01:51
hi silent 8)

ich kommentiere mal den code, sonst wird das nichts, Bezeichner fangen niemals mit einer Zahl ein, sonst hapertst schon da:

Code:
begin
if (1=1a) OR (2=2a) OR (3=3a) OR (4=4a) OR (5=5a) THEN
begin
ShowMessage('Es trifft eine der Bedingungen zu.')
end // vor ELSE nie ein Semikolon (;)
ELSE
ShowMessage('Keine der Bedinugungen trifft zu');
end;
es geht um case
Code:
ch := auswahl;
case ch of
 '1' : showmessage ('sie haben Funktion 1 ausgewählt');
 '2' : showmessage ('sie haben Funktion 2 ausgewählt!');
else
  showmessage ('sie haben keine gültige Funktion ausgewählt !!');
end;
'1' und '2' sind hier keine Bezeichner, wohlgemerkt, den Rest mal nachlesen.

[edit]Jetzt muß ich das doch tatsächlich noch einmal editieren: innerhalb von Case ist eine Sonderregelung für den ; -----> Handbuch, bevor ihr daran verzweifelt.
Gruß
Hansa
  Mit Zitat antworten Zitat