Delphi Dynamisch Variablenname erzeugen

Thema durchsuchen

Ansicht

Themen-Optionen

Dynamisch Variablenname erzeugen

Ein Thema von blackmice · begonnen am 5. Nov 2007 · letzter Beitrag vom 5. Nov 2007

Vorheriger Beitrag

Nächster Beitrag

kolbaschedder

Registriert seit: 24. Aug 2006
Ort: Schwäbisch Gmünd
55 Beiträge

Delphi 2006 Professional

#15

Re: Dynamisch Variablenname erzeugen

5. Nov 2007, 12:10

Hallo,

Hatte mal ein ähnliches Problem. TObject hat eine frei verfügbare Eigenschaft "Tag : Integer". Hier kannst du jedem Trackbar eine ID zuordnen. Alle Trackbars bekommen die gleiche obChange zugeordnet.

in deiner onChange kannst du dann sowas machen

markieren

Delphi-Quellcode:

			  case Sender.tag of

    1 : a := TTrackbar(Sender).position;

    2 : b := TTrackbar(Sender).position;

    3 : c := TTrackbar(Sender).position;

    4 : d := TTrackbar(Sender).position;

    5 : e := TTrackbar(Sender).position;

...

MfG

Kolbi