Entwickler-Ecke

Delphi Language (Object-Pascal) / CLX - ComboBox


BlackPhantom - Do 01.05.03 16:49
Titel: ComboBox
Hi@all

Ist zwar eine Newbe-Frage aber trotzdem könnte einer mir dabei helfen:

Ich habe eine Kombo-Box mit drei Items. Je nachdem welches Item ausgesucht wurde soll die dazu entsprechende Combobox entstehen:


Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
procedure TForm2.CB_LigaSelect(Sender: TObject);
begin

  If CB_Liga.Text ='Deutschland - Bundesliga' then
    CB_Deutschland_Mannschaft.visible:=True;
    CB_England_Mannschaft.visible:=False;
    CB_Italien_Mannschaft.Visible:=False;

    IF CB_Liga.text='Italien - Seria A' then
    CB_Deutschland_Mannschaft.visible:=False;
    CB_England_Mannschaft.visible:=False;
    CB_Italien_Mannschaft.Visible:=True;

end;


Wieso zeigt er mir die Combobox "CB_Italien_Mannschaft" an obwohl ich auf Deutschland oder England geclickt habe?

thx4all
MFG
BlackP


Christian S. - Do 01.05.03 16:55

Weil Du da einige BEGIN und END vergessen hast. "CB_Italien_Mannschaft.Visible:=True;" wird immer ausgeführt!


BlackPhantom - Do 01.05.03 16:59

Oh hab ich wohl vergessen....ich kann mich dunkel daran erinnern, dass man irgendwann die ENDs und BEGINs bei If-Anweisungen weglassen kann. Weißt du zufällig wann?


UGrohne - Do 01.05.03 17:00

nur wenn Du danach einen anderen Block danach hat, z.B. eine for-Schleife oder with-Block.


Christian S. - Do 01.05.03 17:02

Wenn nur eine einzelne Anweisung folgt, kannst Du die BEGINs und ENDs weglassen. Du solltest Dir diesen [http://www.delphi-forum.de/viewtopic.php?t=2971] Beitrag einmal anschauen, er könnte sehr hilfreich für Dich sein! Außerdem stammt er von mir, was natürlich das schlagkräftigste Argument ist, warum Du den Beitrag lesen solltest. :wink:

//edit: ja, die einzelne Anweisung kann auch ein while-, with- oder For-Block sein, denn das ist ja eigentlich auch eine einzelne Anweisung. Repeat-Until auch. Was vergessen?


BlackPhantom - Do 01.05.03 17:06

Danke werde mir mal den Beitrag anschauen.....thx4all@both