[sanello]

Сообщение от roamer

Не знаю, насколько это полезно (в данном контексте), но если привязать "контрол" к конкретной Excel ячейке (по правой кнопке меню вызвать редактор свойств и записать адрес соотв. ячейки в свойство LinkedCell), то достаточно делать просто обмен инфой с данной ячейкой. Автоматически это затронет и "контрол".
Например.
Если на Excel-лист положить ComboBox и привязать его к ячейке $A$1, то этот код работает :

Код:

procedure TForm1.Button3Click(Sender: TObject);
Var
  Vx : variant;
begin
  Excel.ActiveWorkbook.ActiveSheet.Cells[1,1]:='22222';
  Vx:=trim(Excel.ActiveWorkbook.ActiveSheet.Cells[1,1]);
  ShowMessage('1-  '+Vx);
  Excel.ActiveWorkbook.ActiveSheet.Cells[1,1]:='44444';
  Vx:=trim(Excel.ActiveWorkbook.ActiveSheet.Cells[1,1]);
  ShowMessage('2-  '+Vx);
end;

дело в том что это не мой Excel файл, моя задача его заполнить и получить результат