SpeedButton einen Wert zuweisen

[Kompon Ente]

Hallo,

ich wollte mal fragen, ob es möglich ist, einem SB den Wert 'A' vom Typ String zuzuweisen, damit bei Buttonklick dieser Wert ausgewählt wird und in eine Variable geschrieben wird.

Geht das?

[Treffnix]

Nicht direkt, aber wenn es immer nur ein Char ist, könnstest du z.B. das Tag benutzen und dann im Buttonclick mit Text := char( Sender.Tag ) arbeiten.

[Kompon Ente]

Bei Buttonklick soll der Char in eine Variable geschrieben werden. Wie mach ich das genau?

[DerDan]

Oder du leitest von Speedbutton eine eigene Buttonklasse ab, die du nur um ein Feld zur Speicherung dieses assoziierten Strings erweiterst.



mfg DerDan

[Aenogym]

er könnte den string auch per NewStr() erstellen und den zurückgelieferten pointer in der tag eigenschaft des buttons speichern. beim beenden der anwendung sollte der erstellte string aber unbedingt wieder freigegeben werden.

aenogym

[DerDan]

@Aenogym

das ist richtig! allerdings hat eine abgeleitete Klasse den Vorteil,

das man die Stings mit dem Objekinspektor eintragen kann und sie dann auch automatisch mit abgespeichert werden.

Daher kommt es darauf an, wie häufig man das Problem hat um die angemessene Lösung zu finden

derDan

[Aenogym]

das stimmt ;)

[sniper_w]

Zitat:

Bei Buttonklick soll der Char in eine Variable geschrieben werden. Wie mach ich das genau?

In dem du einen OnClick Eventhandler implementierst...

Delphi-Quellcode:

var Mychar:Char;

procedure TForm1.SpeedButton1Click(Sender: TObject);
begin
  Mychar := 'E';
end;

[Kompon Ente]

Hab's jetzt mit 'ner Konstante & Array's in einer Prozedur gelöst! ;)