Thema: I/O Error 103

Einzelnen Beitrag anzeigen

EDatabaseError

Registriert seit: 11. Mai 2005
Ort: Göppingen
1.238 Beiträge
 
Delphi 2007 Professional
 
#12

Re: I/O Error 103

  Alt 27. Jun 2006, 13:58
Zitat von bonanza:
Delphi-Quellcode:
{...}
var
  Form1: TForm1;
  MyTextFile: TStringList;
  text_Datei : System.Text;
  s:String;
  bla:textfile;
  list1:TStringlist;

//...
procedure TForm1.FormCreate(Sender: TObject);
begin
 timer1.Enabled := true;
timer1.interval := 30000;
end;


procedure TForm1.Ontimer(Sender: TObject);
//--------------------------------------------------muss da nicht ein begin hin gruebel???
AssignFile (Text_Datei, 'C:\test.txt');
rewrite(text_datei);
Write(Text_Datei, IdHTTP.Get('http:/-entfernt-/test.txt') );
CloseFile(Text_Datei);
//....
muss da oben nicht ein begin hin?!?
Tobias
It's not a bug, it's a feature.
  Mit Zitat antworten Zitat