AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein GUI-Design mit VCL / FireMonkey / Common Controls Delphi Eingabefelder zur Laufzeit onKeyPress zuweisen
Thema durchsuchen
Ansicht
Themen-Optionen

Eingabefelder zur Laufzeit onKeyPress zuweisen

Ein Thema von Delphimagnet · begonnen am 21. Okt 2004 · letzter Beitrag vom 21. Okt 2004
Antwort Antwort
Benutzerbild von Leuselator
Leuselator

Registriert seit: 18. Mär 2003
Ort: Berlin
589 Beiträge
 
Delphi 8 Architect
 
#1

Re: Eingabefelder zur Laufzeit onKeyPress zuweisen

  Alt 21. Okt 2004, 08:25
Delphi-Quellcode:
// Weist allen input Feldern auf der Sendernform (Dialog) ihre dazugehörige Suchenfunktion zu
procedure assignOnEnterSearch (Sender : TForm);
var
  iCompCount : integer;
  tmpComp : TComponent;
begin
  // Gehe alle Komponenten durch
  For iCompCount := Sender.ComponentCount-1 downTo 0 do
  begin
    tmpComp := Sender.Components[iCompCount];
    // Prüfe ob die Komponente ein Inputfeld ist
    if (tmpComp is TLabeledEdit) then TLabeledEdit(tmpComp).OnKeyUp := XXX
    else if (tmpComp is TEdit) then TEdit(tmpComp ).OnKeyUp := XXX;
  end;
end;
sollte gehen...
Gruß
Tim Leuschner
Programmierer = moderner Sysiphos: stets wenn er meint, den Stein seiner Dummheit auf den Berg des Wissens gewuchtet zu haben, erblickt er einen völlig neuen Aspekt und der Dummfels poltert mit Getöse zurück ins Tal der Unwissenheit...
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 16:27 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