AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren

WebInterface wie eMule

Ein Thema von SebE · begonnen am 8. Sep 2005 · letzter Beitrag vom 10. Sep 2005
Antwort Antwort
SebE

Registriert seit: 31. Jul 2004
Ort: Chemnitz
316 Beiträge
 
Delphi 7 Personal
 
#1

WebInterface wie eMule

  Alt 8. Sep 2005, 18:08
Hi, ich möchte (nur aus Test-Zwecken) ein Web-Interface, wie das von eMule, basteln.
Es soll nur auf meinem Rechner laufen. (Kein Web-Server)

ist das mit den Sockets möglich?

Ich hab's mal versucht:
Delphi-Quellcode:
unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, ScktComp, StdCtrls;

type
  TForm1 = class(TForm)
    Memo1: TMemo;
    procedure FormCreate(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
    SocketServer: TServerSocket;
    procedure ClientRead(Sender: Tobject; Socket: TCustomWinSocket);
    procedure GetSocket(Sender: TObject; Socket: Integer; var ClientSocket: TServerClientWinSocket);
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.ClientRead(Sender: Tobject; Socket: TCustomWinSocket);
begin
Socket.SendText('Hallo')
end;

procedure TForm1.GetSocket(Sender: TObject; Socket: Integer; var ClientSocket: TServerClientWinSocket);
begin
ClientSocket.SendText('Hallo')
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
SocketServer := TServerSocket.Create(Application);
SocketServer.Port := 80;

SocketServer.Active := True;
SocketServer.OnClientRead := ClientRead;
SocketServer.OnGetSocket := GetSocket;
end;

end.
...aber die Ereignisse treffen nie zu - Warum nicht?

PS: Delphi 7 PE

Achso: Wenn ich dann Text an den Browser senden kann, wie lese ich Parameter in der URL ein?
Sebastian
  Mit Zitat antworten Zitat
Robert_G
(Gast)

n/a Beiträge
 
#2

Re: WebInterface wie eMule

  Alt 8. Sep 2005, 18:19
Schaue dir mal IntraWeb an...
  Mit Zitat antworten Zitat
SebE

Registriert seit: 31. Jul 2004
Ort: Chemnitz
316 Beiträge
 
Delphi 7 Personal
 
#3

Re: WebInterface wie eMule

  Alt 8. Sep 2005, 18:24
Zitat von Robert_G:
Schaue dir mal IntraWeb an...
Wo soll denn das sein? (ich hab Delphi 7 PE)
Gibt es diese Kompos kostenlos zum Download?
Sebastian
  Mit Zitat antworten Zitat
Robert_G
(Gast)

n/a Beiträge
 
#4

Re: WebInterface wie eMule

  Alt 8. Sep 2005, 18:27
Zitat von SebE:
ich hab Delphi 7 PE
Stand da nicht eben noch "Delphi 7E"?
Die D2005 PE mit ASP.Net macht das sogar noch einfacher möglich.

ASP.Net ohne Designer (sowas ist eh nur eingeschränkt einsetzbar) ist auch mit #develop möglich.
  Mit Zitat antworten Zitat
SebE

Registriert seit: 31. Jul 2004
Ort: Chemnitz
316 Beiträge
 
Delphi 7 Personal
 
#5

Re: WebInterface wie eMule

  Alt 10. Sep 2005, 10:00
hat denn Keiner schon mal so was in der Art gemacht?
Sebastian
  Mit Zitat antworten Zitat
Benutzerbild von SirThornberry
SirThornberry
(Moderator)

Registriert seit: 23. Sep 2003
Ort: Bockwen
12.235 Beiträge
 
Delphi 2006 Professional
 
#6

Re: WebInterface wie eMule

  Alt 10. Sep 2005, 11:19
wenn du auf port 80 lauschst ist es doch schon so ne Art web-Server. Da kannst du auch gleich idhttp verwenden.
Jens
Mit Source ist es wie mit Kunst - Hauptsache der Künstler versteht's
  Mit Zitat antworten Zitat
Themen-Optionen Thema durchsuchen
Thema durchsuchen:

Erweiterte Suche
Ansicht

Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 15:05 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz