AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

with ... do begin Problem

Ein Thema von Schlingel · begonnen am 15. Feb 2003 · letzter Beitrag vom 17. Feb 2003
 
Touchdown

Registriert seit: 17. Feb 2003
227 Beiträge
 
#9
  Alt 17. Feb 2003, 19:59
Ich verstehe dein Problem nicht wirklich aber sowas könnte dir helfen:

Du verzweigst in der Procedure, indem du das übergebene Object auf seine Art prüfst. Allerdings muss du dann in beiden Fallen TObject übergeben.


procedure dingsdabums( pointer : TObject );
begin
if pointer is TCanvas then
begin

....


end
else
begin

{ lass lieber den else Zweig weg und prüf nochmal das Object
if pointer is TWasduwillst then ... }

end;
end;
  Mit Zitat antworten Zitat
 


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 05:40 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