Forum: Object-Pascal / Delphi-Language
Delphi
by CRoSSi,
1. Feb 2008
Jor hatte das @ nach meinem post nochmal probiert :oops: und es gehts endlich.. :bounce1: ein dickes Dankeschön an alle die bei diesem Thread mitgeholfen haben
Forum: Object-Pascal / Delphi-Language
Delphi
by CRoSSi,
24. Jan 2008
Ja ich arbeite mich jetzt das tutorial mal durch muss da nur gucken wie ich das zeitlich halt schaffe..mache das ja nicht hauptberuflich.. :-D
aber danke an alle für die antworten
Forum: Object-Pascal / Delphi-Language
Delphi
by CRoSSi,
24. Jan 2008
So habe das mal probiert..geht leider nicht. Habe
TPortOut = procedure(Port : Word; Data : Byte);stdcall;
bei type angeben aber er sagt: BEZEICHNER ERWARTET ABER PROCEDURE GEFUNDEN
Wenn alles soweit läuft kann ich die Prozedur dann ganz normal aufrufen mit PORTOUT(..)?
Forum: Object-Pascal / Delphi-Language
Delphi
by CRoSSi,
24. Jan 2008
Meine mit geladen:
procedure PortOut(Port : Word; Data : Byte);stdcall; external 'io.dll';
Aber wie funktioniert das Dyamisch? Habe das noch nicht ganz so kappiert..wie es in dem einen thread (s.o.) beschrieben ist.
Evtl kann man mir jemand nen gutes beispiel machen?
Thx nochmal
Forum: Object-Pascal / Delphi-Language
Delphi
by CRoSSi,
24. Jan 2008
:wiejetzt:
wie mache ich das?
mir reicht das schon wenn var=1 ist dass er dann die die funktion aufruft? weil var ist entweder 1 oder 0 bei 0 soll er einfach weiter machen und bei 1 soll die funktion geladen werden. Mehr brauche ich ja nicht. Das würde locker reichen.. Aber da ist das große fragezeichen wie macht man sowas am besten?
thx schonmal
Forum: Object-Pascal / Delphi-Language
Delphi
by CRoSSi,
24. Jan 2008
ne das ist ja klar.. man muss die przedur doch definiern, sodass man die aufrufen kann.. und ich meien die definition dass man die irgendwie in ne if packt. Konkret würde ich des so meinen:
if var=1 then
begin
procedure PortOut(Port : Word; Data : Byte);stdcall; external 'io.dll';
end;
Bekomme sonst ne Fehlermeldung wo der port Treiber nicht installiert ist.
Forum: Object-Pascal / Delphi-Language
Delphi
by CRoSSi,
24. Jan 2008
Hallo,
ich bin neu hier und habe mal ne frage..
weiß jemand wie man eine prozedur bedingt einbinden kann? Also wie man sie aufruft weiß ich, das ist nicht das Problem.
hatte mir das so ca vorgestellt: if var=1 then procedure usw.. hoffe mein Problem ist nachvollziehbar.
Danke schonmal für antworten
Christoph