Hallo
@NickelM
Klar, verschreiben kann man sich immer!
Nicht aber im diesen Fall.
@Lukie
Das mit der Tag-Eigenschaft ist klar, nur ändert das nichts am Problem.
@grenzgaenger
Nee, sobald SerachListView abgearbeitet und damit 'FSearching = true' ist.
[edit] 'zwischengefunkt'
@alzaimar
Ja und Nein.
Warum zwei Button für die gleiche Aufgabe verwenden?
Im Zeitalter von Quad-Core und Co. mach es zwar egal sein, aber von der Funktionalität nicht.
[/edit]
@All
Mal so nebenbei:
Ist euch eigentlich schon mal aufgefallen, das da etwas Faul ist?
Man nehme eine Hauptform und ein Dialog, bei dem Dialog, BorderStyle = bsDialog.
Im Dialog, zwei Buttons und TEdit welches als property Text veröffentlicht ist,
Im
OI : btnOK = Caption = 'OK' = ModalResult = mrOK.
btnCancel = Caption = 'Abbruch' = ModalResult = mrCancel.
Den Dialog aus 'Project->Optione->Formulare->Automatisch Erzeugen' nach 'Project->Optione->Formulare->Verfügbare Formulare'
verschieben.
Und ruft den Dialog im über einen Menüpunkt im Hauptformular etwa so auf:
Delphi-Quellcode:
procedure TForm1.DialogExecute(Sender: TObject);
var
Ret :Boolean;
St : String;
begin
Dialog := TDialog.Create(Self);
try
Dialog.ShowModal;
Ret := SearchDialog.ModalResult = mrOK;
if Ret then St := Dialog.Text;
finally
SearchDialog.Free;
end;
end;
Angenommen Ihr habt im Edit einen Text eingegeben oder auch nicht, welchen Wert hat Ret wenn Ihr btnOk klickt?
Nicht raten, testen.
Gruß