Mam cos takiego...
procedure TForm1.Button1Click(Sender: TObject);
var
Excel: Variant;
Y : integer;
begin
Y:=Y+1;
Excel:=CreateOleObject('Excel.Application');
Excel.WorkBooks.Add;
Excel.displayalerts:=false;// <----
Excel.Cells[Y,1].Value:=Edit1.Text;
Excel.ActiveWorkbook.SaveAs('d:\plik.csv');
Excel.Quit;
end;
end.
Teraz nie wyskakuje okno z komunikatem czy zastapic plik. Tylko teraz jak zrobic zeby dopisywał do pliku zawartosc Edit i nie kasował wczesniejszych. z góry dzieki za pomoc.