|
.NET
protected void button1_Click (object sender, System.EventArgs e)
{
try
{
// An ein DataSet Objekt binden
LL.SetDataBinding(myDataSet, "Orders");
// Setzen von Eigenschaften
LL.AutoDesignerFile = "subrep.lst";
LL.AutoProjectType = LlProject.List;
LL.AutoDialogTitle = "Beispiel";
LL.AutoShowSelectFile = true;
// Start des Designers
LL.Design();
}
// Ausnahmen abfangen
catch (Exception LlException)
{
MessageBox.Show("Information: " +
LlException.Message,"Information",
MessageBox.IconInformation | MessageBox.OK);
}
}
Visual Basic
Private Sub ButtonDesign_Click()
'Startet den Designer mit dem Titel "Rechnung" und der Datei "Rechnung.lst"
ListLabel1.Design(0, hWnd, "Rechnung", LL_PROJECT_LIST, "Rechnung.lst", 1)
End Sub
Für die Datendefinition wird der Event ListLabel1_CmndDefineFields genutzt.
Delphi
{Designer starten}
procedure TForm1.DesignButtonClick(Sender: TObject);
begin
//Datenquelle zuweisen
LL.DataSource := dsCustomers;
//Die customer master Daten sollen als Felder angemeldet werden
LL.AutoMasterMode := mmAsFields;
//Den Standard-Projektnamen setzen
LL.AutoDesignerFile := 'subrep.lst';
//Printmode auf PreviewControl stellen
LL.AutoDestination := adPreview;
//Designer
LL.AutoDesign('Invoice List', '');
end;
C++
// Spezialfelder definieren, normales Textfeld
LLDefineFieldExt(job, "Text", "Testtext",LL_TEXT, NULL);
// Fußzeilenfelder, z.B. numerisch
LLDefineFieldExt(job, "Zwischensumme", "12.34",
LL_NUMERIC | LL_TABLE_FOOTERFIELD, NULL);
// Barcodefelder
LLDefineFieldExt(job, "BC_EAN_128", "123456789abcd", LL_BARCODE_EAN128, NULL);
// variable Grafiken über Dateinamen
LLDefineFieldExt(job, "Normalbild","sunny.bmp", LL_DRAWING, NULL);
// Dateiauswahldialog mit Skizze
LLSelectFileDlgTitleEx(job, hWnd, "Dateiauswahl",
LL_PROJECT_LIST, szFile,sizeof(szFile), NULL);
// Bestimmten Menübefehl aus dem Designer entfernen
LLDesignerProhibitAction(job, 211);
// Start des Designers mit obigen Feldern
LLDefineLayout(job, hWnd, "Titel", LL_PROJECT_LIST, szFile);
Programmierbeispiele Druckausgabe
|