Einzelnen Beitrag anzeigen

Angel4585

Registriert seit: 4. Okt 2005
Ort: i.d.N.v. Freiburg im Breisgau
2.199 Beiträge
 
Delphi 2010 Professional
 
#19

Re: Internetverbindung "verstecken"?

  Alt 11. Apr 2006, 11:07
die Skripte(mehrere) suchen mir Daten von den Spielern zusammen die ich für die aktuelle Aktion brauche, oder speichern Daten in Dateien ab(ich wollt das ohne DB machen).

Also ich sende zum Beispiel hin:
Delphi-Quellcode:
procedure DatenSenden;
var
data: TIdMultiPartFormDataStream;
begin
data:=TIdMultiPartFormDataStream.Create;
with data do
AddFormField('nick','Spielerx');
AddFormField('action','Gebaeude');
AddFormField('code','saljdfa');//Programmcode der im Skript geprüft wird
with IdHTTP1 do
  gebauede:=Post('http://www.zieladresse.de/skript.php',data);
end;
Resultat ist dann sowas wie
Code:
0001 //Gebaeudetyp
000F //Gebaeudelevel
0003 //Gebaeudetyp
000D //Gebaeudelevel
oder wenn z.B. ein Gebaeude ausgabaut werden soll:
Delphi-Quellcode:
procedure DatenSenden;
var
data: TIdMultiPartFormDataStream;
begin
data:=TIdMultiPartFormDataStream.Create;
with data do
AddFormField('nick','Spielerx');
AddFormField('action','Gebaeude');
AddFormField('startzeit',DateTimeToStr(Now));
AddFormField('dauer','1200');
AddFormField('code','saljdfa');//Programmcode der im Skript geprüft wird
with IdHTTP1 do
  gebauede:=Post('http://www.zieladresse.de/skript.php',data);
end;
In diesem Fall bekomm ich wenn das erfolgreich ausgeführt wurde nichts als " '' " zurück, wenns ein Fehler gibt " '1' ".

Ich könnte die vergleich schon in den Skripten machen, allerdings würd ich schon ganz gern den Server entlsaten, auch wenns nicht wirklich viel ist was da passiert.
Martin Weber
Ich bin ein Rüsselmops
  Mit Zitat antworten Zitat