Procedura i php

0

Mam taki odzik:

Input.WriteString(Format('procesy=%s',[ Form1.ListBox1.Items.Text]));
Form1.ht.Post('http://localhost/~projekt/procesy.php',Input,Output);

Żaden błąd nie wyskakuje, ale nie działa!!
Dlaczego tak jest??

0

A skąd my mamy wiedzieć.. nie napisałeś co znaczy "Input", czy "ht" .. co to jest ?

0
procedure TWatek.Execute;
var
Input, Output : TStringStream;
begin
Input := TStringStream.Create('');
Output := TStringStream.Create('');
Rec := TStringList.Create;
FreeOnTerminate:= true;
while not (Terminated) do
begin
Input.WriteString(Format('procesy=%s',[ Form1.ListBox1.Items.Text]));
Form1.ht.Post('http://localhost/~projekt/procesy.php',Input,Output);
Synchronize(Dzialaj);
Sleep(1200000);
end;
end;

Oto ta procedura

0

dlaczego wysylasz postem TStringStream'a ??

tam powinno byc chyba TIdMultiPartFormData

1 użytkowników online, w tym zalogowanych: 0, gości: 1