Autor Beitrag
ixtreme
Gast
Erhaltene Danke: 1



BeitragVerfasst: Do 13.11.03 22:39 
Hi,

ich habe folgendes Problem....

es gibt z.B. diese Procedure in meinem Form

ausblenden Delphi-Quelltext
1:
2:
3:
4:
5:
var
str: string;
begin
str := nmhttp1.get('http://www.ixtreme.de/ip.php');
end;



Wie kann ich diese Procedure mit der indy komponente wie sie hier im beispiel verwendet wird in eine dll auslagern...?

gruß

ixtreme.de
Ex0rzist
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 550

Win XP Prof.
Mandrake 10.0

D6
BeitragVerfasst: Fr 14.11.03 00:04 
Hallo,

hier mal der Code für die DLL:
ausblenden Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
library HalliGalli;  

uses
  SysUtils,
  Classes, IdHTTP, Sharemem;

{$R *.res}

function IdHTTPGet:String; stdcall;
var IdHTTP: TIdHTTP;
begin
IdHTTP := TIdHTTP.Create(nil);
 try
  Result := IdHTTP.Get('http://DeineTolleSeite');
 finally
  IdHTTP.Free;
 end;
end;

exports
  IdHTTPGet;
  
end.


NMHTTP heisst übrigens die Komponente von FastNet.

_________________
If accidentally read, induce vomitting.
ixtreme
Gast
Erhaltene Danke: 1



BeitragVerfasst: Fr 14.11.03 13:05 
ohh sorry, da hab ich mich vertan! teste den Code später mal!
Tino
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Veteran
Beiträge: 9839
Erhaltene Danke: 45

Windows 8.1
Delphi XE4
BeitragVerfasst: Mo 17.11.03 08:18 
ixtreme hat folgendes geschrieben:
teste den Code später mal!

Und? Hat es funktioniert?

Gruß
Tino
Ist die Frage beantwortet? Das Problem gelöst?

Dann klicke hier, um das Thema entsprechend zu markieren!