Einzelnen Beitrag anzeigen

mbamler

Registriert seit: 19. Mai 2005
Ort: Hamburg
118 Beiträge
 
Delphi 7 Architect
 
#11

Re: problem mit Writeln, bitte helft mir...

  Alt 7. Mär 2006, 09:06
Zitat von mmfembr:
ich hab's nun versucht mit einer anderen variable, was jedoch nicht gegangen ist. zusätzlich versuchte ich es wie im beispiel von mbamler was auch nicht geht da die typen miteinander inkonpatibel sind...

folgender Code funktioniert 100%:



procedure TForm1.Button1Click(Sender: TObject);
var
hexarray : array[0..7] of String;
y : Word;
Testvariable : string;
Tfile : TextFile;
begin
hexarray[0] := 'AA';
hexarray[1] := 'FF';
hexarray[2] := '00';
hexarray[3] := '09';
hexarray[4] := '01';
hexarray[5] := 'BB';
hexarray[6] := 'DF';
hexarray[7] := 'CA';

Assignfile(Tfile,'C:\temp\test.txt');
Rewrite(Tfile);

For y := 0 to 7 do
begin
Writeln(Tfile, hexarray[y]);
end;

CloseFile(Tfile);
end;
  Mit Zitat antworten Zitat