Показать сообщение отдельно
  #2  
Старый 06.06.2010, 10:48
Аватар для Kailon
Kailon Kailon вне форума
Активный
 
Регистрация: 06.06.2010
Сообщения: 340
Версия Delphi: 11.3
Репутация: 429
По умолчанию А может и пригодиться...

Если тебе все еще интересно, то вот держи...
Только предваритьльно кинь на форму компонент ExcelApplication1 с закладки Servers. Для простоты его переименовал в Excel.
Код:
var
  Form1: TForm1;
  MyPath: String; //лучше всего в глобальные запихнуть

implementation

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
var
 i: Byte; //для цикла
begin
//получаем путь откуда запустилась программа
 GetDir(0,MyPath);
//подключаемся к документу
 Excel.Workbooks.Add(MyPath + '\Test.xls',0);
//погнали заполнять
 for i := 1 to 20 do
  RadioGroup1.Items.Add(Excel.Cells.Item[i,1]);
end;

P.S.: должно работать и с Office 2007, но точно не скажу, т.к. он меня не устраивает и поэтому не установлен
Ответить с цитированием