Forum: Sonstige Fragen zu Delphi
Delphi
by globetrotter77,
10. Feb 2009
Da muss ich dir natürlich recht geben!
Allerdings! Leider!
PS: zum Thema kryptisch kann ich Brainfuck empfehlen, hier ein Sourcecode-Auszug in strukturierter Form:
>>>>>>]<<<<<<<<<<
]]]]]]]]<<<<<<<<
Forum: Sonstige Fragen zu Delphi
Delphi
by globetrotter77,
10. Feb 2009
StrPLCopy gab es schon im Ur-Pascal???
Kann mich nicht erinnern ... :gruebel:
ganz abgesehen, dass
StrPLCopy (Adresse.KNummer,High(Adresse.KNummer));
schon ein bisschen kryptisch ist, oder?
Forum: Sonstige Fragen zu Delphi
Delphi
by globetrotter77,
10. Feb 2009
var eingabedatei: TextFile;
eingabezeile: string;
kundennummer: string;
begin
assignfile(eingabedatei,'test.txt');
reset(eingabedatei);
while not eof(eingabedatei) do
begin
readln(eingabedatei);
kundennummer:=Trim(copy(eingabezeile,1 , 5));
Forum: Sonstige Fragen zu Delphi
Delphi
by globetrotter77,
10. Feb 2009
oder die ganz banale Methode (ist für Anfänger oft leichter zu verstehen)
assignfile(eingabedatei,'hier kommt der Dateiname hin');
reset(eingabedatei);
while not eof(eingabedatei) do
begin
readln(eingabedatei, eingabezeile);
kundennummer:=trim(copy(eingabezeile, 1, 5));