OBS/Auswertung/Formular Designer: Unterschied zwischen den Versionen
Zur Navigation springen
Zur Suche springen
Böhrer (Diskussion | Beiträge) (Die Seite wurde neu angelegt: „I'm a 42 years old, married and work at the university (Art).<br>In my free time I'm trying to teach myself Korean. I've been twicethere and look forward to re…“) |
|||
| (3 dazwischenliegende Versionen desselben Benutzers werden nicht angezeigt) | |||
| Zeile 1: | Zeile 1: | ||
{{Vorlage:Auswertung}} | |||
<font size="2" color="#000000" face="Arial"> </font> | |||
=Formular Designer= | |||
Beispielcode: | |||
//----------------------------------------------------------------------------- | |||
// Author: ??? | |||
// Datum: ??? | |||
// | |||
// verfügbare Variablen: | |||
// Form: TForm -> aktives Formular | |||
// Parent: TxForm -> Ausgabefenster | |||
// | |||
// verfügbare Methoden: | |||
// function GetSqlExportStr(Parent: TxForm): String; | |||
// procedure SetSqlExportStr(Parent: TxForm; cSql: String); | |||
// function RunSqlExporter(Parent: TxForm; lAuto:Boolean): Boolean; | |||
// function SaveDataSqlExporter(Parent: TxForm; cFileName: String; nWahl: Integer; lAuto: Boolean): Boolean; | |||
// function ShowDataSqlExporter(Parent: TxForm): Boolean; | |||
//----------------------------------------------------------------------------- | |||
const | |||
CSV = 2; | |||
EXCEL = 3; | |||
HTML = 4; // nur im Grid möglich | |||
procedure Button1Click(Sender: TObject); | |||
begin | |||
Form.Edit1.Text := 'Text geändert'; | |||
end; | |||
procedure Button2Click(Sender: TObject); | |||
begin | |||
Form.Close(); | |||
end; | |||
[[Category:html]] | |||
Aktuelle Version vom 30. April 2019, 11:03 Uhr
Auswertung
Offene Postenverwaltung
- Tasten und Schaltflächen
- F3 Druck
- F4 Sortieren
- F5 Markieren
- F6 Summe bilden
- F7 Selektieren
- F8 Demarkieren
- F9 Zahlung
- F10 Archiv
- Eingabemaske
DATEV Schnittstelle
Inventur Artikel
- F10 Gescannte Daten
Data In/Out
Formular Designer
Beispielcode:
//-----------------------------------------------------------------------------
// Author: ???
// Datum: ???
//
// verfügbare Variablen:
// Form: TForm -> aktives Formular
// Parent: TxForm -> Ausgabefenster
//
// verfügbare Methoden:
// function GetSqlExportStr(Parent: TxForm): String;
// procedure SetSqlExportStr(Parent: TxForm; cSql: String);
// function RunSqlExporter(Parent: TxForm; lAuto:Boolean): Boolean;
// function SaveDataSqlExporter(Parent: TxForm; cFileName: String; nWahl: Integer; lAuto: Boolean): Boolean;
// function ShowDataSqlExporter(Parent: TxForm): Boolean;
//-----------------------------------------------------------------------------
const
CSV = 2;
EXCEL = 3;
HTML = 4; // nur im Grid möglich
procedure Button1Click(Sender: TObject);
begin
Form.Edit1.Text := 'Text geändert';
end;
procedure Button2Click(Sender: TObject);
begin
Form.Close();
end;