открыть файл .csv

Рома1111
Дата: 05.06.2009 23:10:03
подскажите как открыть файл .csv Другие форматы получается, а этот нет

procedure TForm1.Button4Click(Sender: TObject);
var
StarDesktop, Document, StarOffice : variant;
begin

StarOffice := CreateOleObject('com.sun.star.ServiceManager');
StarDesktop := StarOffice.createInstance('com.sun.star.frame.Desktop');

Document := StarDesktop.LoadComponentFromURL(ConvertToURL('c:\1.csv'),
'_blank',0,VarArrayCreate([0, -1], varVariant));

Модератор: Пользуйтесь тегом (кнопкой) SRC для оформления кода, пожалуйста.
Гаджимурадов Рустам
Дата: 05.06.2009 23:19:54

Повторяю, еще раз - не занимайся
кросс-постингом и не плоди топики.
Еще один лишний пост - последует бан.

Posted via ActualForum NNTP Server 1.4