traurig aber wahr... (müll im standard)
Verfasst: 2. Oktober 2008 16:59
aus dem report zum verkaufsangebot (standard entrepreneuer):
beschwerde wahr, dass eine manuell eingefügte zeile in einem textbaustein nicht angedruckt wird. ja kein wunder... eine mittendrin (statt am ende) eingefügte zeile bekommt zb die ID 2500 und was wird hier hardcodiert!?! unglaublich...
- Code:
IF ExtTextLine.FIND('-') THEN BEGIN
REPEAT
IF ExtTextLine."Line No." = 10000 THEN
HeaderText[1] := ExtTextLine.Text;
IF ExtTextLine."Line No." = 20000 THEN
HeaderText[1] := HeaderText[1] + ' ' + ExtTextLine.Text;
IF ExtTextLine."Line No." = 30000 THEN
HeaderText[2] := ExtTextLine.Text;
IF ExtTextLine."Line No." = 40000 THEN
HeaderText[2] := HeaderText[2] + ' ' + ExtTextLine.Text;
IF ExtTextLine."Line No." = 50000 THEN
HeaderText[3] := ExtTextLine.Text;
IF ExtTextLine."Line No." = 60000 THEN
HeaderText[3] := HeaderText[3] + ' ' + ExtTextLine.Text;
UNTIL ExtTextLine.NEXT = 0;
END;
beschwerde wahr, dass eine manuell eingefügte zeile in einem textbaustein nicht angedruckt wird. ja kein wunder... eine mittendrin (statt am ende) eingefügte zeile bekommt zb die ID 2500 und was wird hier hardcodiert!?! unglaublich...