Hallo,
Die Daten im cListLabelViewer (Preview) stehen, sind stehts die ersten Daten, aus dem 1. Aufruf von StartReport.
Beim debuggen in OnFindNextRecord werden die aktuellen Werte gezeigt aber es folgt kein Refresh in cListLabelViewer.
Object oReportPreview is a cListLabelViewer
Set Bitmap to ""
Set Size to 340 452
Set Location to 3 3
Set peAnchors to anAll
Set Attach_Parent_State to True
End_Object
Procedure StartReport
Integer iRet iProjectType
String sFile
Handle hoLL hoMain hWnd
Move oListLabelReport to hoLL
// Find a window as a parent for all List & Label Windows
Get SuggestedParentWindowHandle of hoLL (Self) to hWnd
// Get the Project Type selected
Get piReportProjectType to iProjectType
// Open Print Job
Get LLJobOpen of hoLL to iRet
Move (gsLLDefaultLayoutDirectory + "RECHNUNGsBuch2.Lst") to sFile
If (trim(sFile)="") Begin
Get LLJobClose of hoLL to iRet
Procedure_Return
End
// Start the Print always in Preview (LL_PRINT_PREVIEW)
Get LLPrintWithBoxStart of hoLL iProjectType sFile LL_PRINT_PREVIEW LL_BOXTYPE_EMPTYABORT hWnd "Printing Records" to iRet
If (iRet<>0) Begin
Get LLPrintEnd of hoLL to iRet
Get LLJobClose of hoLL to iRet
Procedure_Return
End
// Print the whole Report
Get DoPrintList of hoLL to iRet
// End the Printjob
Get LLPrintEnd of hoLL to iRet
// Let the class do some Cleanup
Get LLPreviewDisplay of hoLL sFile "" hWnd to iRet
// Close the Job
Get LLJobClose of hoLL to iRet
End_Procedure
was fehlt damit im Preview die neuen Daten gezeigt werden
Außerdem funktioniert hier der SourceCodeMode nicht.
Ralf