Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   kann objekte in eigenen proceduren nicht aufrufen!!! (https://www.delphipraxis.net/85575-kann-objekte-eigenen-proceduren-nicht-aufrufen.html)

Kamikaze87 1. Feb 2007 17:28


kann objekte in eigenen proceduren nicht aufrufen!!!
 
Hi leute
ich habe schon wieder eine frage

ich habe aus einer prozedur eines buttons clicks in eine eigene prozedur "verlinkt" . nun will ich aus der nicht von delphi erstellten prozedur objekte wie ein memo feld verändern!

jedoch geht dieses nicht weil ja die objekte nicht als information in der von mir erstellten prozedur vorhanden sind......
wie kann ich dieses problem beheben oder muss ich alle informationen als variable zurückschicken als prozedurübergabe variablen????
ich hoffe nicht...



hoffe ihr könnt mir helfen

Kamikaze

mkinzler 1. Feb 2007 17:30

Re: kann objekte in eigenen proceduren nicht aufrufen!!!
 
Übergib doch ne referenz auf das Objekt (z.B. als Self)

inherited 1. Feb 2007 17:34

Re: kann objekte in eigenen proceduren nicht aufrufen!!!
 
Entweder du erstellst die Funktion als Member von der TForm42 oder du schreibst vor jedem MemoX ein Form42.

Kamikaze87 1. Feb 2007 17:46

Re: kann objekte in eigenen proceduren nicht aufrufen!!!
 
Hi danke


euch beiden aber
das mit dem self müsstest du mir noch näher erklären ich weiss nicht wo hin ich das schreiben müsste....aber prinzipiell ist das egal weil der tipp von nikolai wyderka hat schon funktioniert!!!


aber trotzdem danke euch beiden!!!!

obwohl ich auch selber darauf hätte kommen können!!11

MfG

Kamikaze

oldmax 2. Feb 2007 05:56

Re: kann objekte in eigenen proceduren nicht aufrufen!!!
 
Hi
Ich vermute mal, du hast deine Procedure nicht in die Formdeklaration unter Private oder Public geschrieben.also in der Form

Delphi-Quellcode:
{ private }
Procedure MyEreignisProc; // oder weitere Parameter, halt so wie's gebraucht wird.
....                     // weitere Procedures  
                         

Implementation
.....
procedure TMyForm.MyEreignisProc; // hier wird klar, das diese Procedure zu TMyForm gehört
Begin
 .....
  MyMemo.Lines.Add('irgendwas'); // hier ist jetzt der Zugriff auf Eigenschaften
                                 //anderer zur Formgehörenden Objete möglich
end;

procedure TMyForm.Button1click(Sender: TObject); // das ist die Quelle vom Ereignis
begin
  MyEreignisProc; // verlinkte Procedure
end;
Gruß oldmax

[edit=SirThornberry]Quelltext berichtigt (2 mal fehlendes "procedure " ergänzt) - Mfg, SirThornberry[/edit]


Alle Zeitangaben in WEZ +1. Es ist jetzt 14:36 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