![]() |
Re: DLL wegen RTTI zu einem Package umbauen
Ach ja und das Problem mit der RTTI könntest du auch dadurch lösen, dass die EXE sowie deine DLLs alle "Mit Runtime-Pckages kompilieren" aktiv haben und dort "rtl;vcl" eingetragen ist. Ggf. auch noch vcldb dazu.
|
Re: DLL wegen RTTI zu einem Package umbauen
Zitat:
Du meinst da problem wenn er meldet "Tstringlist ist nicht vom Typ Tstringlist" *g* das würde sich dann erübrigen? Ok, die Sache könnte ich zwar nicht entscheiden aber es wäre eine weiter Option. Du meinst also ich könnte ein package mit nur einer Unit mit meinen Funktionen und nem Exportteil machen und das ganze dann ohne Änderung auf der Anwendungsseite benutzen? |
Re: DLL wegen RTTI zu einem Package umbauen
Danke an alle
Diese Beispiel scheint zu funktionieren nochmals Danke! Das Package
Delphi-Quellcode:
Unit des Packages
package Test;
{$R *.res} {$ALIGN 8} {$ASSERTIONS OFF} {$BOOLEVAL OFF} {$DEBUGINFO ON} {$EXTENDEDSYNTAX ON} {$IMPORTEDDATA ON} {$IOCHECKS ON} {$LOCALSYMBOLS ON} {$LONGSTRINGS ON} {$OPENSTRINGS ON} {$OPTIMIZATION OFF} {$OVERFLOWCHECKS ON} {$RANGECHECKS ON} {$REFERENCEINFO OFF} {$SAFEDIVIDE OFF} {$STACKFRAMES OFF} {$TYPEDADDRESS OFF} {$VARSTRINGCHECKS ON} {$WRITEABLECONST ON} {$MINENUMSIZE 1} {$IMAGEBASE $400000} {$IMPLICITBUILD OFF} requires vcl, rtl; contains TESTLIB in 'TESTLIB.pas'; end.
Delphi-Quellcode:
Die Anwendung
unit TESTLIB;
interface uses dialogs; Procedure LoadLib; exports LoadLib; implementation Procedure LoadLib; Begin Showmessage('*Schnips*'); end; end.
Delphi-Quellcode:
unit Testformular;
interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Button1: TButton; procedure Button1Click(Sender: TObject); private { Private-Deklarationen } public { Public-Deklarationen } end; TTestProc = Procedure; var Form1: TForm1; Alib:Thandle; aMethod:TTestProc; implementation {$R *.dfm} procedure TForm1.Button1Click(Sender: TObject); var p:Pointer; begin alib := 0; alib := LoadPackage(Pchar('Test.bpl')); If alib<>0 then Begin p := nil; p := GetProcAddress(alib,PChar('LoadLib')); if p <> nil then Begin @AMethod := p; AMethod; end; UnloadPackage(alib); end; end; end. |
Re: DLL wegen RTTI zu einem Package umbauen
Zitat:
|
Re: DLL wegen RTTI zu einem Package umbauen
Alles Umsonst sorry.
Aber eine BPL war nicht die lösung für das problem. denn Ich brauche in der DLL (oder bpl) und in der Anwendung unterschiedlich kompilierte Units und packages. Das kann ich nur mit einer DLL haben. Eine andere lösung wär COM aber 1. ist das Projekt schon zu weit fortgeschritten um jetzt noch com zu machen und 2. ist com nicht gerade performant. Werde jetzt DLL Seitig auch mit eigenen TDatasets arbeiten welches ohne assign, is, as funktionieren. (den Großteil kann man ja aus der DBTables(oder DbISAMTables) übernehmen) |
Re: DLL wegen RTTI zu einem Package umbauen
:?: Wie mache ich es, wenn ich alle units in packages gesteckt habe und von der exe datei aus jedoch nur bestimmte objekte aus einigen packages aufrufen will? :?:
|
AW: Re: DLL wegen RTTI zu einem Package umbauen
Zitat:
schaffe ich es auch damit (wenn ich EXE und DLL mit rtl und vcl packages compiliere), das ich in einer "normalen" DLL eine Objekt samt RTTI erzeuge, dieses Objekt dann in ner Funktion der EXE gebe und die EXE kann dann per RTTI auf die properties zugreifen? Oder hab ich dieses Aussage falsch verstanden? |
AW: DLL wegen RTTI zu einem Package umbauen
Wenn alles mit Runtime-Packages und alles mit dem absolut gleichen Kompiler erzeugt wurde, dann ja.
Dann kannst du aber auch gleich ein Package anstatt einer DLL verwenden. |
AW: DLL wegen RTTI zu einem Package umbauen
Man sollte nie Objekte im Interface einer Dll verwenden. Für diesen Zweck wurden die Bpls entwickelt (technisch handelt es sich ja um Dlls, mit erweitertem Interface)
|
AW: DLL wegen RTTI zu einem Package umbauen
Ich habe bei den BPL's Angst, das wenn sich viel in der EXE tut ich jedesmal die BPL's erneut erzeugen muss
Der Kompiler würde eh immer gleich sein/bleiben ... Nur muss ich eben von 2-3 Stellen dynamisch diese Objekte erzeugen und dynamisch auf RTTI Properties zugreifen können |
Alle Zeitangaben in WEZ +1. Es ist jetzt 02:37 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 by Thomas Breitkreuz