Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by alzaimar,
29. Aug 2008
Aber das tun sie doch gar nicht:
procedure TSuchDialog.btnSearchClick(Sender: TObject);
begin
if (cboColumns.Text = '') or (cboFindText.Text = '') then Exit;
if (FSearchObj is TListView) and (not FSearching) then
begin
btSearch.Visible := false;
btStop.Visible := true;
SearchListView;
end;
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by alzaimar,
28. Aug 2008
Wäre es nicht -sagen wir- marginal sauberer, zwei Buttons zu verwenden? Einen für 'Stop' und einen für 'Suche'. Sie liegen übereinander uns sichtbar ist entweder der eine oder der andere.
Das Event für den 'Suchen' Knopf verbirgt diesen und macht den "Stop"-Knopf sichtbar und umgekehrt. Über zwei separate und einfach zu verstehende Klick-Events kann man auch die Logik übersichtlich steuern....