Hallo, kann jemand weiter helfen?
Aus meiner Datenbank muss ich eine txt-Datei exportieren.Die Satzlänge ist 128. Das funktioniert bei allen Sätzen bis auf den letzten Satz, der 20 Zeichen zu wenig bringt.
Delphi
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
| while not tblASatz.Eof do
begin
sLineString := '';
sLineString := sLineString + 'A';
sLineString := sLineString + FillStr(tblASatz.FieldByName('Nr').AsString, 7, '0', taRightJustify);
sLineString := sLineString + FillStr(tblASatz.FieldByName('Ordnungsbegriff').AsString, 13, ' ', taRightJustify);
sLineString := sLineString + FillStr(tblASatz.FieldByName('Nutzer_Nr').AsString, 20, ' ', taLeftJustify);
sLineString := sLineString + FillStr(tblASatz.FieldByName('art').AsString, 1, '0', taRightJustify);
sLineString := sLineString + FillStr('', 86, ' ', taRightJustify);
Writeln(fExportFile,sLineString);
tblASatz.Next;
end;
tblASatz.Close; |
Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
| A00312001084800000720006060 0......................................................................................//Satzende
A00312001084800000730006059 0......................................................................................//Satzende
A00312001084800000740006058 0......................................................................................//Satzende
A00312001084800000750006061 0......................................................................................//Satzende
A00312001084800000760006074 0......................................................................................//Satzende
A00312001084800000770006075 0......................................................................................//Satzende
A00312001084800000780006076 0......................................................................................//Satzende
A00312001084800000790006073 0.....................................................................//Satzende |
Was kann man hier eventuell ändern?
Danke schon mal im Voraus!!
Moderiert von 
Th69: Delphi-Tags hinzugefügt
Moderiert von Th69: Titel geändert.Moderiert von Th69: Topic aus Datenbanken (inkl. ADO.NET) verschoben am Di 17.04.2018 um 08:52
