plausibilitätsprüfung

[polondo]

hi,
ich hab da eine frage bezüglich der umsetzung einer plausibilitätsprüfung für meine anwendung.
wie ist es möglich eine procedure zu schreiben, die in der lage ist objekte von denen sie aufgerufen wird selbst zu handeln. beispiel: 2 oder mehr editfelder auf verschiedenen Forms sollen nur numerische werte zulassen. das heißt das die procedure die geschrieben wird sowohl den form-namen als auch den objektnamen zuordnen müsste. habe schon einige versuche mit tsender / tobject und tfield unternommen... jedoch erfolglos. wäre echt nett wenn mir da einer nen rat geben könnte... möchte mir die arbeit ersparen für jede Form ne eigene plausi zu schreiben :/

mfg R

[Jelly]

An dein Edit Feld kommst du über den Sender Parameter, der dir im im Ereignis mitgegeben wird... Auf dieses Edit Feld zugreifen kannst du:

Delphi-Quellcode:

if Sender is TEdit then with Sender as TEdit do begin
   // hier kannst du direkt auf die Eigenschaft des Edit Feldes zugreifen.
end ;

[marabu]

Hi polondo,

herzlich willkommen in der Delphi-PRAXiS.

Dein Problem kann auf unterschiedliche Weise angegangen werden. Mehrere Edit-Felder können sich den gleichen Event-Handler teilen. Sollen unzulässige Zeichen gar nicht erst eingegeben werden können, dann kannst du im Ereignis OnKeyDown der Edit-Felder eingreifen. Genügt eine Schlussprüfung, dann kannst du im Ereignis OnCloseQuery() der Form reagieren. Du kannst eine eigene Komponente TNumEdit von TEdit ableiten...

Wenn du über die OnKey-Ereignisse von TEdit gehst, dann bekommst du im Parameter Sender das Objekt mitgeteilt und Sender.Owner ist in der Regel die Form, auf der die Komponente beheimatet ist.

Grüße vom marabu

@Jelly: hab wohl zu lange Pausen beim Tippen eingelegt...

[polondo]

danke für die schnellen antworten! werd das gleich mal ausprobieren ;o)