Ich danke alleeeeee
Und die Loesung:
**********DELPHI****************
procedure TForm3.Button2Click(Sender: TObject);
var
lHTTP: TIdHTTP;
lParamList: TStringList;
result,key,a : string;
begin
lParamList := TStringList.Create;
lParamList.Add('T1=τεστ');
lParamList.Add('key=MEINPASSWORT123');
lHTTP := TIdHTTP.Create(nil);
try
Result := lHTTP.Post('http://........../test.php', lParamList);
finally
lHTTP.Free;
lParamList.Free;
end;
ShowMessage(result);
end;
***********PHP******************
<?php
header("Content-Type: text/
html; charset=UTF-8");
define("KEY","MEINPASSWORT123");
define('DB_SERVER',"
localhost");
define('DB_NAME',"????????????");
define('DB_USER',"???????????");
define('DB_PASSWORD',"??????????????");
$conn = mysql_connect(DB_SERVER, DB_USER, DB_PASSWORD);
mysql_select_db(DB_NAME, $conn);
mysql_query("SET NAMES 'utf8_general_ci'", $conn);
mysql_query("SET CHARACTER SET 'utf8_general_ci'", $conn);
$T1 = $_POST["T1"];
$T2 = $_POST["name"];
mysql_query("SET character_set_results = 'utf8', character_set_client = 'utf8', character_set_connection = 'utf8', character_set_database = 'utf8', character_set_server = 'utf8'");
if(isset($_POST['key']))
{
if($_POST['key'] == KEY)
{
if(isset($_POST['T1']))
{
$result = mysql_query("INSERT INTO test(onoma)
VALUES('".$T1."') ") or die(mysql_error());
if(mysql_affected_rows() == 1)
{
$result = "αποθηκεύτηκε";
} else $result = "Error
MySQL-Datenbank";
} else $result = "Error1";
} else $result = "Error2";
} else $result = "Error3";
echo "WWW Result:".$result;
?>
**************************************************