fputc für Delphi?

[Neutral General]

Hi,

Die Procedure fputc schreibt ein Char in eine Datei die man (in Delphi) mit AssignFile geöffnet hat.

Was benutzt man da in Delphi? Ich benutze gerade das hier:

BlockWrite(file,Buf,1); geht das? Weil mein Programm funktioniert nicht.. die Frage ist halt ob es daran liegt...

Außerdem hab ich da ein kleines Problem mit for-Schleifen:

Code:

for(i = i + j; i < 0x1000 - sizeof(bla) + 1; i++)
fputc(bla,bla);

Code:

for( j = 0; i < 0x1000 && j < sizeof(bla) - 1; i++, j++)

Keine Ahnung wie ich sowas übersetzen soll o.O

Ich meine das erste geht zwar theoretisch aber

Delphi-Quellcode:

for i:= i + j to $1000-SizeOf(Bla)+1 do
 ...

ist schon seltsam...

Gruß
Neutral General