Klasse TFDBImport

Unit

uFDBImport

Deklaration

type TFDBImport = class(TForm)

Beschreibung

Hierarchie

• TForm
• TFDBImport

Übersicht

Felder

	Label1: TLabel;
	CBProjektAuswahl: TComboBox;
	LstDateien: TCheckListBox;
	BtnPfadauswahl: TButton;
	BtnOk: TButton;
	BtnAbbrechen: TButton;
	BtnHilfe: TButton;
	Label2: TLabel;
	PfadAuswahlDlg: TPBFolderDialog;
	ThreadLadeProjekte: TJvThread;
	ThreadLadeDateien: TJvThread;
	ThreadImportDateien: TJvThread;
	Label3: TLabel;
	EdtPfad: TEdit;

Methoden

	procedure BtnOkClick(Sender: TObject);
	procedure BtnAbbrechenClick(Sender: TObject);
	procedure FormActivate(Sender: TObject);
	procedure FormCreate(Sender: TObject);
	procedure FormDestroy(Sender: TObject);
	procedure CBProjektAuswahlChange(Sender: TObject);
	procedure BtnHilfeClick(Sender: TObject);
	procedure BtnPfadauswahlClick(Sender: TObject);
	procedure ThreadLadeProjekteExecute(Sender: TObject; Params: Pointer);
	procedure ThreadLadeProjekteFinish(Sender: TObject);
	procedure ThreadLadeDateienExecute(Sender: TObject; Params: Pointer);
	procedure ThreadLadeDateienFinish(Sender: TObject);
	procedure ThreadImportDateienExecute(Sender: TObject; Params: Pointer);
	procedure ThreadImportDateienFinish(Sender: TObject);
	procedure SetDBEinstellungen(var pDB : pDBEinstellungen);

Beschreibung

Felder

	Label1: TLabel;

	CBProjektAuswahl: TComboBox;

	LstDateien: TCheckListBox;

	BtnPfadauswahl: TButton;

	BtnOk: TButton;

	BtnAbbrechen: TButton;

	BtnHilfe: TButton;

	Label2: TLabel;

	PfadAuswahlDlg: TPBFolderDialog;

	ThreadLadeProjekte: TJvThread;

	ThreadLadeDateien: TJvThread;

	ThreadImportDateien: TJvThread;

	Label3: TLabel;

	EdtPfad: TEdit;

Methoden

	procedure BtnOkClick(Sender: TObject);

	procedure BtnAbbrechenClick(Sender: TObject);

	procedure FormActivate(Sender: TObject);

	procedure FormCreate(Sender: TObject);

	procedure FormDestroy(Sender: TObject);

	procedure CBProjektAuswahlChange(Sender: TObject);

	procedure BtnHilfeClick(Sender: TObject);

	procedure BtnPfadauswahlClick(Sender: TObject);

	procedure ThreadLadeProjekteExecute(Sender: TObject; Params: Pointer);

	procedure ThreadLadeProjekteFinish(Sender: TObject);

	procedure ThreadLadeDateienExecute(Sender: TObject; Params: Pointer);

	procedure ThreadLadeDateienFinish(Sender: TObject);

	procedure ThreadImportDateienExecute(Sender: TObject; Params: Pointer);

	procedure ThreadImportDateienFinish(Sender: TObject);

	procedure SetDBEinstellungen(var pDB : pDBEinstellungen);
Public-Deklarationen