2 Tabelle in ein Seite


Ich habe 2 Tabellen in einer Seite. Solange erste Tabelle-Zeilen nicht überschreitet (also kein neu Seite), 2. Tabelle Inhalt kann man sehen, andersrum 2. Tabelle zeigt nur Caption. Ich habe Bildern zugefügt. ich benutze auch Objectenable . Erste Schleife für Rechnungs-items , 2. Schleife für Steuer-items.

LL 26 , Delphi 7, :

LL.LlDefineVariableStart;
LL.LlDefineFieldStart;
LLxDefineVariable;
LLxDefineFields();
LL.LlPrintStart(LL_PROJECT_LIST, ‘xxx.lst’, LL_PRINT_PREVIEW);

LL.LlPrint;
if Assigned(Xrechnung) then
begin
ll.LlPrintEnableObject(‘:Tb2’, True);
ll.LlPrintEnableObject(‘:Tb1’, False);
for i := 0 to Xrechnung.RechnungItems.Count - 1 do
begin
LLxDefineFields(i);
while LL.LlPrintFields = LL_WRN_REPEAT_DATA do
begin
LL.LlPrint;
end;
end;
ll.LlPrintEnableObject(‘:Tb2’, False);
ll.LlPrintEnableObject(‘:Tb1’, True);
Application.ProcessMessages;
for j := 0 to 5 do
begin
if Xrechnung.TaxSubTotal[j].IsTax then
begin
LLxDefineFieldsTax(j);
while LL.LlPrintFields = LL_WRN_REPEAT_DATA do
begin
LL.LlPrint;
end;
end;
end;
ll.LlPrintEnableObject(‘:Tb2’, true);
ll.LlPrintEnableObject(‘:Tb1’, True);
end;
ll.LlPrintEnd(0);

Mach ich irgendwo Fehler ?

Vor dem LlPrint() sollten auf jeden Fall beide Tabellen wieder eingeschaltet werden, sonst kann genau das passieren.

Probiert. Nichts geändert. Solange neu Seite kommt, Tabelle 2 zeigt kein Data.

Dann brauchen wir ein Logfile des Drucks. Vielleicht auch mal beim Support melden :slight_smile: .

Debwin4.log4 (498.1 KB)