Aus der Delphi Hilfe hab ich folgendes
Zitat:
Der Standardwert von ModalResult ist mrNone. Wenn Sie der Eigenschaft einen anderen Wert zuweisen, wird das Formular geschlossen, und der Wert wird zum Rückgabewert des ShowModal-Funktionsaufrufs, mit dem das Formular angezeigt wird.
das heisst ich mach das so
Delphi-Quellcode:
procedure TfmSucheStrasse.cxButton1Click(Sender: TObject);
begin
with ClientDataModule do
begin
tbl_blocks.Active:=false;
tbl_blocks.Params.ParamByName('parPlz').Value:=cxTextEdit1.Text;
tbl_blocks.Params.ParamByName('parStrasse').Value:=cxTextEdit2.Text;
tbl_blocks.Params.ParamByName('parHausNr').Value:=cxTextEdit3.Text;
tbl_blocks.Params.ParamByName('parStiege').Value:=cxTextEdit4.Text;
tbl_blocks.Active:=true;
end;
cxTextEdit1.Clear;
cxTextEdit2.Clear;
cxTextEdit3.Clear;
cxTextEdit4.Clear;
ModalResult:=mrOk //<<<<<<<<---------
end;
also das Form schließt so. Nur ist der Einsatz der richtige ?
lg
Bundy