Thema: Delphi Return to Sender

Einzelnen Beitrag anzeigen

Benutzerbild von chrisw
chrisw

Registriert seit: 11. Jan 2005
Ort: Schleswig
193 Beiträge
 
Delphi XE8 Professional
 
#3

Re: Return to Sender

  Alt 15. Nov 2005, 08:05
so in etwa müsste das aussehen !
Delphi-Quellcode:
for i := 0 to ComponentCount -1 do
  if Component[i] is TEdit then
    if (Component[i] as Tedit).Text = 'then
    begin
      (Component[i] as TEdit).SetFocus;
      break;
    end;
Christian Wahl
me, myself and I, die lustigen Drei !!
  Mit Zitat antworten Zitat