Forum: Object-Pascal / Delphi-Language
Delphi
by thomasch,
1. Jul 2005
Danke - das hab ich jetzt begriffen. Ich kam auf den Trichter, da es mit varint nicht funktionierte.
var
LongArray: packed array Of DWORD;
begin
LongArray := 1234567889;
LongArray := 563565;
// usw.
acadapp.GetLinks('wasweisich', LongArray);
Forum: Object-Pascal / Delphi-Language
Delphi
by thomasch,
1. Jul 2005
OOOPs
Soory, ich hab das letzte zunächst überlesen wenn long in VB doch ein 32Bit integer ist, sollte
VarArrayCreate(,varinteger);
eigentlich tun.
Irgendwie hab ich jetzt keinerlei Ahnug mehr warum das nich funzt. :wall: :wall:
Forum: Object-Pascal / Delphi-Language
Delphi
by thomasch,
1. Jul 2005
Hallo,
danke erstmal für Deine Hife :-D
Daran zweifle ich langsam auch :(
Ich habe momentan eigentlich nur die OnlineHife, ein VB Beispiel und die Deklaration in der TLB. Alles ziemlich wage...
Das VB Beispiel:
Forum: Object-Pascal / Delphi-Language
Delphi
by thomasch,
29. Jun 2005
Sorry - meinte natürlich 2005 :wall:
Ansonsten - kann man irgendwo nachlesen, wo und was man da machen kann/muss?
Zu meiner Verteidigung kann ich nur sagen, dass ich bis April nich wusste was Delphi ist :spin2:
Viele Grüße
Thomasch
Forum: Object-Pascal / Delphi-Language
Delphi
by thomasch,
29. Jun 2005
Puuuh - ehrlich gesagt bin ich mehr der AutoCAD als Delphi Freak.
Auf AutoCAD greife ich, da es sonst ziemlich nervig werden kann mit später Bindung zu.
In etwa sieh das dann so aus:
var
acadapp: variant;
begin
acadapp:=comobj.GetActiveOleObject('AutoCAD.Application.16');
Forum: Object-Pascal / Delphi-Language
Delphi
by thomasch,
29. Jun 2005
N bissl Hintergrund:
Ich rufe eine Funkion von AutoCAD auf, die als einen Paramter ein Vararray "long" braucht.
VarArrayCreate(,VarInteger) gibt ne Fehlermeldung aus - es _müssen_ longs sein.
Wenn das wirklich n Bug sein sollte - is der nur in D7 oder auch in 2000?
Besorgte Grüße
Thomasch
Forum: Object-Pascal / Delphi-Language
Delphi
by thomasch,
29. Jun 2005
Hallo,
Delphi kennt den wunderschönen Datentypen varInt64. Leider bekomme ich bei
var
bla: Variant;
begin
bla:=VarArrayCreate(,varInt64);