var book: TXLSWorkbook;
begin
try
book := TXLSWorkbook.Create;
with book.Sheets.Add do begin
showmessage(inttostr(FSheetID));
Cells[2,2].Select;
Shapes.AddPicture('12.wmf');
end;
finally
book.SaveAs('book.xls');
book.Close;
book.Free;
end;
Блокировка файла в delphi
есть такой компонент: nativeexcel 2.0
и код:
Если выполнить этот код повторно, delphi ругнеться что файл('12.wmf') занят приложением. Что я ток не пробывал даж запускать на разных формах, а потом уничтожать их. Единственное что не пробывал, это запуск в потоке, но думаю это мало поможет.
Как освободить файл('12.wmf'), дескриптор которого не известен, но известно что заблокировало, собственное приложение?
и код:
Код:
Если выполнить этот код повторно, delphi ругнеться что файл('12.wmf') занят приложением. Что я ток не пробывал даж запускать на разных формах, а потом уничтожать их. Единственное что не пробывал, это запуск в потоке, но думаю это мало поможет.
Как освободить файл('12.wmf'), дескриптор которого не известен, но известно что заблокировало, собственное приложение?
А есть метод добавления картинки из потока (например, Shapes.AddPictureFromStream(Stream1)), а не из файла напрямую?
Цитата: unmoved
е
Если выполнить этот код повторно, delphi ругнеться что файл('12.wmf') занят приложением. Что я ток не пробывал даж запускать на разных формах, а потом уничтожать их. Единственное что не пробывал, это запуск в потоке, но думаю это мало поможет.
Если выполнить этот код повторно, delphi ругнеться что файл('12.wmf') занят приложением. Что я ток не пробывал даж запускать на разных формах, а потом уничтожать их. Единственное что не пробывал, это запуск в потоке, но думаю это мало поможет.
по-моему, это глюк компонента...