Hi!
Also zu Fuß oder einfach es gibt sicherlich 100 Ansätze..
Wir wäre es mit einem Record
Delphi-Quellcode:
{$A1}
TAdresse = Record
KNR : array[0..5] of char
KundenName : array[0..18] of char;
end;
var
Zeile : String;
F : Textfile;
Adresse : TAdresse;
begin
Readln(F,Zeile);
Move(Zeile[1],Adresse,sizeof(Adresse));
end;
Grüsse Frank
