Hallo,
Danke für deine schnelle Antwort
Zitat von
Spider:
meine Frage vorweg: Welche Internetverbindung hast du?
Ich habe DSL 2000.
Zitat:
Es wäre auch gut, wenn du uns den relevanten Code zeigst (der vom Upload), damit wir dir helfen können.
Hier:
Delphi-Quellcode:
function SendPictureData(Ahttp: TIdHTTP;
const AtoURL:
String;
const aParams: TStrings):
String;
//Ahttp: Die HTTP Komponente von Indy
//AtoURL: An diese URL werden die Informationen gesendet
//aParams: Array mit Bildern (Pfad)
//Result: HTML-Ergebnis (Antwort des Scripts)
Var
lStream: TMemoryStream;
//HTML-Result des PHP-Scripts
I: Integer;
picture: TIdMultiPartFormDataStream;
//Unit IdMultipartFormData muss eingebunden werden
begin
Result:='
';
if not Assigned(aHttp)
then
exit;
lStream := TMemoryStream.create;
picture := TIdMultiPartFormDataStream.Create;
try
AHTTP.Request.ContentType := '
multipart/form-data';
//Dieser Stream wird letztendlich gesendet
//Stream mit Werten füllen
for I:=0
to aParams.Count-1
do
picture.AddFile('
bild'+IntToStr(I+1),aParams[I],'
image/jpeg');
try
//Stream an das PHP-Script senden
AHTTP.Post(AtoURL,
picture,
lStream);
except
on E:
Exception do
showmessage('
Fehler bei der Übertragung: ' + E.
Message);
end;
SetLength(Result,lStream.Size);
lStream.Position:=0;
lStream.ReadBuffer(Result[1],lStream.Size);
finally
picture.Free;
lStream.Free;
end;
end;
Zitat:
Was gefällt dir an der Lösung mit Zip nicht? So schlecht finde ich die nichtmal.
Ich glaube es ist kein
Standart bei den Providern diese in PHP einzukompilieren! Daher scheint es mir unpraktisch
Zitat:
Für jeden Upload erstellst du einen Thread (Schau mal auf
www.michael-puff.de da hats ein prima Tutorial) und übergibst diesem Thread den Dateinamen, den du hochladen willst und, wohin die Datei soll.
Werde mir das mal anschaun. Hört sich fürs erste mal gut und brauchbar an.
MfG
Bennle