Тема: Ecxel в Edit
Показать сообщение отдельно
  #1  
Старый 29.10.2009, 21:18
UrbaSergei UrbaSergei вне форума
Прохожий
 
Регистрация: 29.10.2009
Сообщения: 1
Репутация: 10
По умолчанию Ecxel в Edit

Всем Привет! Кто подскажет как данные из одной ячейки Excel передать в Edit, если в Ecxel в этой ячейке данные переодически обновляются(они автоматически поступают из другой программы, но не сохраняются).Закрыть Excel я не могу, так как нарушится передача данных из той другой проги.

Я догадываюсь, что нужно как то сделать так, чтоб данные в Excel автоматически сохранялись без её закрытия, НО КАК это сделать? Автосохранение самого Excel срабатывает только через 1 минуту(нужно чаще) и то не всегда, мне нужно это сделать через Delphi. ПОМОГИТЕ!!!

Пока прога написана так:
Код:
procedure TForm1.Edit1Click(Sender: TObject);
var
Ap : Variant;
A: integer;
begin

Ap := CreateOleObject('Excel.Application');
Ap.Workbooks.Add('C:\Users\ТРОН\Desktop\INTRA2.xls');
Ap.Visible := True;
A :=Ap.Range['A1'];
Edit1.Text:=IntToStr(A);
end;
Admin: Пользуемся тегами!
Ответить с цитированием