
22.11.2009, 20:45
|
Начинающий
|
|
Регистрация: 09.11.2009
Сообщения: 145
Репутация: 238
|
|
Код:
var
ComboBox: TComboBox;
Text: string;
begin
ComboBox := Form6.ComboBox;
if ComboBox.ItemIndex >= 0 then
begin
Text := ComboBox.Items[ComboBox.ItemIndex];
if Text = ' Бууууу ' then
Form9.Show
else if Text = ' Бууууу1 ' then
Form7.Show;
end;
end;
|