Delphi-PRAXiS
Seite 3 von 3     123   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Memo OnChange Procedure zuweisen?? (https://www.delphipraxis.net/128859-memo-onchange-procedure-zuweisen.html)

himitsu 8. Feb 2009 11:03

Re: Memo OnChange Procedure zuweisen??
 
wenn du die Prozedur nicht umschreiben willst, dann könntest du noch eine Umleitung einbauen

in einer Klasse eine Funktion reinmachen, welche als OnChange-Ereignis aufgerufen weren kann und diese leitet dann alles an deine Prozedur weiter.

oder könntest du zumindestens die Parameter deiner Prozedur etwas erweitern?

DelphiPeter 8. Feb 2009 11:05

Re: Memo OnChange Procedure zuweisen??
 
naja, theoretisch könnte ich die procedure einfach umschreiben, aber ich war eigentlich froh das es soweit nun funktioniert. Kann ich nicht einfach eine eigene TStringlist bauen, sowas wie TPetersListe, dann könnte ich ja dort alles ableiten von der richtigen tstringlist, oder wie? hmm... bin überfragt.

himitsu 8. Feb 2009 11:21

Re: Memo OnChange Procedure zuweisen??
 
Ist zwar nicht unbedingt der Beste weg, aber so könnte man es notfalls auch noch lösen
Delphi-Quellcode:
type TMyNotifyEvent = class
    class procedure MyOnChange(Sender: TObject);
  end;

class procedure TMyNotifyEvent.MyOnChange(Sender: TObject);
  begin
   
  end;

procedure TForm1.FormCreate(Sender: TObject);
  begin
    Memo1.OnChange := TMyNotifyEvent.MyOnChange;
  end;
theoretisch sähe die reine Prozedurdefinition einer TNotifyEvent-Prozedur so aus:
Delphi-Quellcode:
procedure MyOnChange(Self, Sender: TObject);
Würde auch funktioonieren, aber dafür muß man die Typenprüfung von Delphi schon überlisten, da
Procedure <> Procedure of Object.
Man müßte also irgendwie den Typ von Pointer ( @MyOnChange ) nach TNotifyEvent umbiegen, da sich die Prozedur sonst nicht an .OnChange übergeben läßt.

DelphiPeter 8. Feb 2009 13:56

Re: Memo OnChange Procedure zuweisen??
 
Na also das werde ich mal ausprobieren. Vielen Dank im VOrraus!

_frank_ 8. Feb 2009 14:44

Re: Memo OnChange Procedure zuweisen??
 
Zitat:

Zitat von DelphiPeter
Na also das werde ich mal ausprobieren.

ich hoffe, du meinst damit nicht den Hack, den Himitsu angedeuted hat...

wozu ableiten und neue klasse erstelen?
warum nicht aus der procedure eine Methode machen? wie ist dein Aufbau? liegt die dll in einer Dll?

in dem fall sollte eine simple umleitung das problem doch lösen, oder nicht?
was spricht dagegen?

Fragen über Fragen...

Gruß Frank


Alle Zeitangaben in WEZ +1. Es ist jetzt 02:16 Uhr.
Seite 3 von 3     123   

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 by Thomas Breitkreuz