Einzelnen Beitrag anzeigen

quendolineDD

Registriert seit: 19. Apr 2007
Ort: Dresden
781 Beiträge
 
Turbo Delphi für Win32
 
#17

Re: mit den Cursortasten zum nächstliegen Control springen

  Alt 25. Mai 2009, 10:18
Ich schau mir das heut Mittag oder Nachmittag mal an. Ist gerade noch zu früh.
TObject habe ich verwendet, da es die "Mutter" aller Klassen ist und somit auch die Superklasse aller von ihr abgeleiteten Klassen, kann sie auch alle (dank der Polymorphie) in direkter Vererbungslinie stehenden Klassen beherbergen.
Dann solltest du zur Übersicht vielleicht noch eine Variable vom Typ TPlanGame erstellen und in jeder Schleife einmal variable := TPlanGame(Parent.Components[iii]); Und dann darauf jeweils zugreifen mit variable.left usw. Das macht alles etwas übersichtlicher.

Dann zu meinem obigen Quelltext. Es hat mir lediglich das Edit genannt welches am nähesten Rechts von dem Button ist.
Vielleicht solltest du alle deine Objekte aus der Taborder nehmen und diesen einfach den Fokus zuweisen mit MSDN-Library durchsuchenSetFocus.

Edit: Rechtschreibfehler entfernt.
Lars S.
Wer nicht mit der Zeit geht, geht mit der Zeit.
  Mit Zitat antworten Zitat