Problem mit ComboBox

[mkinzler]

Label1.Visible

[Landfloh]

Zitat von DeddyH:

Wie, auf 1 stehen? ItemIndex oder Text?

ItemIndex

[DeddyH]

Label1.Visible := (ComboBox1.ItemIndex = 1) and (ComboBox2.ItemIndex = 1);

[Landfloh]

Und wenn man das jetzt in den Ouelltext einbauen würde?

[mkinzler]

Einfach nach dem Case

[Landfloh]

Dann kommt das [Fehler] Unit1.pas(32): Konstantenausdruck erwartet

[DeddyH]

Delphi-Quellcode:

begin
  case ComboBox1.ItemIndex of
    0 : Label1.Caption := '1';
    1 : begin
          Label1.Visible := ComboBox2.ItemIndex = 1;
          //man könnte hier auch noch vorher auf visible abfragen
          Label1.Caption := '2';
        end;
    2 : Label1.Caption := '3';
  end;
end;

[Landfloh]

Wenn ich ComboBox1 auf 1 stelle und ComboBox2 auf 2 dann zeigt er trozdem 1 an.
Ich möchte aber das er nur 1 anzeigt wenn beide ComBoxen auf 1 stehen.

[mkinzler]

Du hast eigentlich alles was du brauchst. Du musst also nur den Code an die gewünschten Bedingungen anpassen

[DeddyH]

Was ich gepostet habe, war die Ereignisbehandlung von ComboBox1. Es sollte nicht allzu schwierig sein, das auch auf ComboBox2 zu übertragen, oder?