Показать сообщение отдельно
  #6  
Старый 26.09.2008, 08:28
melnikovpa melnikovpa вне форума
Прохожий
 
Регистрация: 25.09.2008
Сообщения: 3
Репутация: 10
По умолчанию

Итак... Предположим что у тебя есть Сombo Box и Image. По событию onChange у тебя загружается картинка.

Цитата:
procedure TForm1.ComboBox1Change(Sender: TObject);
begin
Image1.Picture.loadFromFile(ComboBox1.Text);
end;

При смене индекса в Combobox событие OnChange не вызывается, для того чтобы это исправить тебе надо сделать так:

Цитата:
var
Ini:TIniFile;
begin
Ini:=TIniFile.Create(ExtractFilePath(Application.E xeName)+'config\data.ini');
ComboBox1.ItemIndex:=Ini.ReadInteger('FORM3','Form 3ComboBox1ItemIndex', Form3.ComboBox1.ItemIndex);
ComboBox1.OnChange(nil); //данная строчка вызовет OnChange
Ini.Free;
end;

Это только один из способов решения этой проблемы... ПОЧИТАЙ ЛИТЕРАТУРУ ПО DELPHI и многие вещи кажущиеся трудными покажутся тебе очень простыми....
Ответить с цитированием