![]() |
Delphi-Version: 5
FindComponent und TCheckBox
Hallo Allerseits,
ich habe eine Frage zu der Funktion FindComponent in Verbindung mit Checkboxen. Bisher habe ich FindComponent in Verbindung mit Edit-Feldern verwendet:
Delphi-Quellcode:
Das funktioniert prima. Ich übergebe mit "sName" den Namen der Komponente und lese dann den Inhalt.
MyText:=(AParent.FindComponent(sName) as TEdit).Text;
Nun möchte ich das Ganze um Checkboxen erweitern. Und zwar möchte ich wieder die entsprechende Checkbox über ihren Namen im Form finden und dann abfragen, ob diese ab-/angehakt ist. Ich habe es mit
Delphi-Quellcode:
probiert, aber der Compiler meldet den Fehler "Operator ist auf diesen Operandentyp nicht anwendbar" und zeigt auf den Punkt vor ".checked".
MyCheckbox:=(AParent.FindComponent(sName) as TCheckBox).checked;
Verwende ich die falsche Syntax oder geht das nicht? |
AW: FindComponent und TCheckBox
Was für ein Typ ist "MyCheckbox"?
|
AW: FindComponent und TCheckBox
Zitat:
|
AW: FindComponent und TCheckBox
StdCtrls ist eingebunden? Bei mir (Delphi 2007) habe ich keine Probleme feststellen können:
Delphi-Quellcode:
function GetChecked(const AParent: TWinControl; const AName: string): Boolean;
begin Result := (AParent.FindComponent(AName) as TCheckBox).Checked; end; |
AW: FindComponent und TCheckBox
Zitat:
Was ist anders, wenn man die Abfrage über eine Funktion und nicht direkt macht? |
AW: FindComponent und TCheckBox
Zitat:
|
AW: FindComponent und TCheckBox
Zitat:
Hier mal die Prozedur mit den wichtigsten Teilen:
Delphi-Quellcode:
procedure TMyClass.Check(sName: String);
var sWert: string; MyCheckbox: Boolean; begin [...] sWert:=(FForm.FindComponent(sName) as TEdit).Text; //das funktioniert problemlos MyCheckbox:=(FForm.FindComponent(sName) as FCheckBox).checked; //hier meldet der Compiler den o.g. Fehler [...] end; |
AW: FindComponent und TCheckBox
Was ist denn FCheckbox?
|
AW: FindComponent und TCheckBox
Zitat:
Das muss natürlich TCheckbox heißen. Ein klassischer copy'n'paste-Fehler. Problem ist damit gelöst :-D Manchmal muss eben auch mal jemand anderes auf den Quellcode schauen. Danke DeddyH! |
AW: FindComponent und TCheckBox
Keine Ursache, gern geschehen ;)
|
Alle Zeitangaben in WEZ +1. Es ist jetzt 21:03 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz