Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  Re: Bedingt Prozedur aufrufen

    Delphi
    by oki, 1. Feb 2008
  Moin Crossi,
  
  du mußt auch die Beiträge lesen. Muetze1 und ich hatten das drei Beiträge vorher diskutiert. Bei der Abfrage auf nil muß das @ davor.
  Schreib es so wie Muetze1 es gesagt hat:
  
  if assigned(PortOut) then
  
  
  oder so:
• Forum: Object-Pascal / Delphi-Language

  Re: Bedingt Prozedur aufrufen

    Delphi
    by oki, 1. Feb 2008
  Schreibfehler,
  
  Address mit doppeltem d
  
  dann klappts auch mit dem Nachbarn!
  
  Moin und Gruß oki
• Forum: Object-Pascal / Delphi-Language

  Re: Bedingt Prozedur aufrufen

    Delphi
    by oki, 30. Jan 2008
  Dazu ziehe ich meine Meinung zurück und behaupte das Gegenteil :mrgreen:
  
  - aber was soll's, ich hab' ja keine Ahnung... :mrgreen:
  
  gruß oki
• Forum: Object-Pascal / Delphi-Language

  Re: Bedingt Prozedur aufrufen

    Delphi
    by oki, 30. Jan 2008
  Hi,
  
  Das mit dem assigned verwende ich bei mir eigentlich auch immer. Hab an dieser Stelle aus dem Thread kopiert und mir nichts dabei gedacht, da das nil in der globalen Variablenzuweisung auch nicht angemeckert wird. Somit geb ich dir ungeprüft recht. Bei der Zuweisung der Proceduradresse klappt das aber definitiv ohne @ !!! Hab ich vorherige Woche grad mit einer dynamischen DLL-Einbindung...
• Forum: Object-Pascal / Delphi-Language

  Re: Bedingt Prozedur aufrufen

    Delphi
    by oki, 30. Jan 2008
  Hi Muetze1,
  
  ich hab mich durch die miese Formatierung etwas durcheinander bringen lassen. Der Compiler sollte aber eher wegen der fehlenden End's meckern.
  
  so sollte es aber doch richtig sein ... oder bin ich jetzt blind :gruebel:
  
  type TPortOut = procedure(Port:Word;Data:Byte); stdcall;
  
  var PortOut: TPortOut = nil;
  AHandle: THandle = 0;
• Forum: Object-Pascal / Delphi-Language

  Re: Bedingt Prozedur aufrufen

    Delphi
    by oki, 30. Jan 2008
  Upps,
  
  klar, sorry!
  
  Gruß oki
• Forum: Object-Pascal / Delphi-Language

  Re: Bedingt Prozedur aufrufen

    Delphi
    by oki, 30. Jan 2008
  So wird ein Schuh draus:
  
  
  {$R *.dfm}
  type TPortOut = procedure(Port:Word;Data:Byte); stdcall;
  
  var PortOut: TPortOut = nil;
  AHandle: THandle = 0;
  
  implementation
• Forum: Object-Pascal / Delphi-Language

  Re: Bedingt Prozedur aufrufen

    Delphi
    by oki, 24. Jan 2008
  Was heißt bei dir geladen? Du meinst nicht zufällig ausführen?
  
  Wenn Die Funktion geladen werden soll (aus DLL?), dann mußt du sie wie vorher schon gesagt dynamisch einbinden. Gib aber erst mal mehr Infos was du mit laden meinst.
  
  Gruß oki
  
  Sorry, hatte den zweiten Post übersehen. Also aus DLL! Dann mußt du dynamisch laden und vor der Procedurezuweisung prüfen.