fremd DLL einbinden

[DeddyH]

Ich hab kein D2005, aber Du bist vermutlich über "Komponenten - Komponente importieren" gegangen, oder? Dann müsstest Du im Anschluss eigentlich eine Komponente finden (ich würde einmal auf dem Reiter "ActiveX" nachsehen).

[hoika]

Hallo,

die XXX_TLB.Pas
enthält doch schon alles.

Jetzt musst du damit nur noch ein COM-Objekt erzeugen.


Heiko

[judoka]

Zitat:

Zitat von hoika

Hallo,

die XXX_TLB.Pas
enthält doch schon alles.

Jetzt musst du damit nur noch ein COM-Objekt erzeugen.
Heiko

Wo kann ich bitte nachlesen wie das COM-Objekt erzeugt wird?

[judoka]

[code=delphi]
unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

EasyByte_TLB, ComObj,

Dialogs, StdCtrls;

type

TmyEasyRtm2HtmlDll = class(TAutoObject, RTF2HTMLv8 ) ;

TForm2 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);

private
{ Private-Deklarationen }
public
{ Public-Deklarationen }
end;

var
Form2: TForm2;

implementation

{$R *.dfm}

procedure TForm2.Button1Click(Sender: TObject);

var myEasyRtm2Html : TmyEasyRtm2HtmlDll;*
strHTML : STRING;

begin
myEasyRtm2Html := TmyEasyRtm2HtmlDll.Create *;

// myEasyRtm2Html := CreateObject('EasyByte.RTF2HTMLv8') ;

// ?????????????
// soweit keine Fehlermeldung nur kann ich nicht auf die folgenden proceduren zugreifen????
// wer kann helfen - sehe den Wald vor lauter Bäumen nicht
// it works not

myEasyRtm2Html.HTML_Title := 'Test if control is loaded';
myEasyRtm2Html.DoDebug := 'no' ;
myEasyRtm2Html.HTML_Colour := 'FFAAFF' ;

Code:

  myEasyRtm2Html.RTF_Text := '{\rtf1 <Hello!> \par }}' ;
  myEasyRtm2Html.Generator := 'Demo 1' ;
  myEasyRtm2Html.Links := 'yes' ;
  myEasyRtm2Html.ConvertImages := 'no' ;
  myEasyRtm2Html.CleanRTF := 'yes' ;

  strHTML := myEasyRtm2Html.ConvertRTF ;

end;

[edit=SirThornberry]Delphi-Tags gesetzt - nächstes mal bitte selbst machen. Mfg, SirThornberry[/edit]

[sirius]

Ich würde darauf tippen:

Delphi-Quellcode:

var myEasyRtm2Html : ImyEasyRtm2HtmlDll;
strHTML : STRING; 

begin 
myEasyRtm2Html := TmyEasyRtm2HtmlDll.Create as ImyEasyRtm2HtmlDll; 

//und hier dann wie gewohnt weiter

Edit: und lass dieses type (TmyEasyRtm2HtmlDll = class(TAutoObject, RTF2HTMLv8 ) weg!

[SirThornberry]

Ohne dir jetzt zu nahe treten zu wollen: Ich glaub nicht das du speziell bei Verwendung der DLL nicht weiter kommst sondern habe den Eindruck das dir generell einige Grundlagen fehlen (unabhängig davon welche DLL oder welche Active-X-Komponente du verwenden willst).
Ich würde dir nahe legen erstmal die entsprechenden Tutorials durchzuarbeiten: http://www.delphi-treff.de/tutorials/