AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Datenbanken Delphi Variable aus dem Script in Delphi holen...

Variable aus dem Script in Delphi holen...

Ein Thema von TheMiller · begonnen am 30. Okt 2004 · letzter Beitrag vom 8. Nov 2004
Antwort Antwort
Seite 1 von 2  1 2   
Benutzerbild von TheMiller
TheMiller

Registriert seit: 19. Mai 2003
Ort: Gründau
2.480 Beiträge
 
Delphi XE7 Architect
 
#1

Variable aus dem Script in Delphi holen...

  Alt 30. Okt 2004, 03:19
Hi, ich stehe schon vor dem nächsten Problem. Habe mich damit auch schon vorher befasst. Hier die Schilderung:

Ich habe in meine MySQL-DB Einträge gemacht. Diese möchte ich Abrufen und dann in meinem Programm ausgeben. Dabei soll jede Spalte in ein neues Label rein. Ungefähr so:

Delphi-Quellcode:
Label1.Caption:=DBSpalte('Datum');
Label2.Caption:=DBSpalte('Zeit');
etc.
Doch wie verwirkliche ich das? Die Variablenübergabe von Delphi zum Script funzt einwandtfrei und das habe ich auch verstanden. Nur den umgekehrten Weg, kenne ich nicht. Ich kann mir nur denken, dass es etwas mit $Get zu tun haben könnte, aber alle versuche schlugen fehl...

Danke im Vorraus
  Mit Zitat antworten Zitat
Benutzerbild von TheMiller
TheMiller

Registriert seit: 19. Mai 2003
Ort: Gründau
2.480 Beiträge
 
Delphi XE7 Architect
 
#2

Re: Variable aus dem Script in Delphi holen...

  Alt 30. Okt 2004, 17:33
*push*
  Mit Zitat antworten Zitat
Dax
(Gast)

n/a Beiträge
 
#3

Re: Variable aus dem Script in Delphi holen...

  Alt 30. Okt 2004, 17:35
Was meinst du mit "Script"?
  Mit Zitat antworten Zitat
Benutzerbild von MrSpock
MrSpock
(Co-Admin)

Registriert seit: 7. Jun 2002
Ort: Owingen
5.865 Beiträge
 
Delphi 2010 Professional
 
#4

Re: Variable aus dem Script in Delphi holen...

  Alt 30. Okt 2004, 17:37
Hallo DJ-SPM,

wie holst du denn die Daten aus der Datenbank in dein Delphi Programm? Welche Komponenten benutzt du? Kannst du das Stück Code posten, mit dem du die Daten abrufst?
Albert
Live long and prosper


MrSpock
  Mit Zitat antworten Zitat
Benutzerbild von Aenogym
Aenogym

Registriert seit: 7. Mär 2004
Ort: Schwerin
1.089 Beiträge
 
Delphi 7 Enterprise
 
#5

Re: Variable aus dem Script in Delphi holen...

  Alt 30. Okt 2004, 17:43
ich glaube, er benutzt eine PHP datei, die verbindung zur DB hat.
er ruft die datei mit get-parametern auf, um daten zu speichern.

also, wenn du das so amchst, dann kannst du vom PHP-script die daten echo'en lassen. du kannst ja eine INI-ähnliche struktur verwenden.
das ganze dann einfach auslesen mit pos() und copy()

Aenogym
Steffen Rieke
Was nicht buzzt, wird buzzend gemacht!
http://blog.base-records.de
http://www.base-records.de
  Mit Zitat antworten Zitat
Benutzerbild von TheMiller
TheMiller

Registriert seit: 19. Mai 2003
Ort: Gründau
2.480 Beiträge
 
Delphi XE7 Architect
 
#6

Re: Variable aus dem Script in Delphi holen...

  Alt 30. Okt 2004, 23:36
Jap, ich benutze einen PHP-Script. Ich poste ihn weiter unten nochmal. Die Variablenübergabe vom Delphiprogramm geht über idhttp mit der Funktion Post. Dazu später auch nochmal ein Code.

Wie gesagt, ich möchte meinen PHP-Script vom Delphi-Programm aus ein vermitteln. Danach such der Script in der DB nach dem Datum und holt sich die Einträge. Diese Einträge sollen dann vom Script an das Delphi-Programm übermittelt werden, wobei die Werte in einzelnen Label-Komponenten eingetragen werden.

Ich kann mit echo in ein Memo die ganzen Werte eintragen, aber nicht jeden Wert einzeln in ein Label... Ich denke, das müsste mit "_Get" funzen. Weiß aber net wie. Hier die Codes:

SQL-Code:
<?PHP
  $db_server=$_POST['$db_server'];
  $db_name=$_POST['$db_name'];
  $db_user=$_POST['$db_user'];
  $db_passwort=$_POST['$db_passwort'];
  $mode=$_POST['$mode'];
  $Datum=$_POST['$Datum'];
  $Zeit=$_POST['$Zeit'];
  $Name=$_POST['$Name'];
  $Wert=$_POST['$Wert'];

/*echo     $_POST['$db_server'].chr(13).chr(10);*/
/*echo     $_POST['$db_name'].chr(13).chr(10);*/
/*echo     $_POST['$db_user'].chr(13).chr(10);  */  
/*echo     $_POST['$db_passwort'].chr(13).chr(10);*/
/*echo     $test;*/

switch ($mode) {
  case "insert":
    insert();
    break;
  case "drop":
    drop();
    break;
}

function drop()
{
global $db_server,$db_user,$db_passwort, $db_name;
  $db = @MYSQL_PCONNECT($db_server,$db_user,$db_passwort)
    or die ("Konnte keine Verbindung zur Datenbank herstellen");
  $db_check = @MYSQL_SELECT_DB($db_name); if($db) echo "Verbindung zur Datenbank wurde hergestellt";
}


function insert()
{
global $db_server,$db_user,$db_passwort, $db_name, $Datum, $Zeit, $Mandant, $Ra;
  $db = @MYSQL_PCONNECT($db_server,$db_user,$db_passwort)
    or die ("Konnte keine Verbindung zur Datenbank herstellen");
  $db_check = @MYSQL_SELECT_DB($db_name); if($db) echo "Verbindung zur Datenbank wurde hergestellt";

$sql = mysql_query("INSERT INTO `1104` (`Datum`,`Zeit`,`Name`,`Wert`) VALUES ('$Datum', '$Zeit', '$Name', '$Wert')");

echo "Es wurden alle Daten in die Datenbank eingetragen";
echo mysql_error();
}
?>
und der DP-Source:

Delphi-Quellcode:
procedure TForm1.Button2Click(Sender: TObject);
var sl : TStringlist;
begin
  sl := TStringList.Create;
  sl.Add('$db_server='+Edit1.Text);
  sl.Add('$db_name='+Edit2.Text);
  sl.Add('$db_user='+Edit3.Text);
  sl.Add('$db_passwort='+Edit4.Text);
  sl.Add('$Datum='+DateToStr(DateTimePicker1.Date));
  sl.Add('$Zeit='+Edit6.Text);
  sl.Add('$Name='+Edit7.Text);
  sl.Add('$Wert='+Edit8.Text);
  sl.Add('$mode=insert');
  Memo1.Text := idHttp1.Post('http://www.xxxx.com/xxxx.php,sl);
FreeAndNil(sl);
end;
Danke im Vorraus!
  Mit Zitat antworten Zitat
Benutzerbild von TheMiller
TheMiller

Registriert seit: 19. Mai 2003
Ort: Gründau
2.480 Beiträge
 
Delphi XE7 Architect
 
#7

Re: Variable aus dem Script in Delphi holen...

  Alt 31. Okt 2004, 12:23
hier ein weiterer Push...
  Mit Zitat antworten Zitat
Benutzerbild von Sharky
Sharky

Registriert seit: 29. Mai 2002
Ort: Frankfurt
8.252 Beiträge
 
Delphi 2006 Professional
 
#8

Re: Variable aus dem Script in Delphi holen...

  Alt 1. Nov 2004, 06:37
Zitat von DJ-SPM:
hier ein weiterer Push...
Hai DJ-SPM,

ich bitte Dich eindringlich das Pushen deiner Beiträge in einem Zeitraum von weniger als 24 Stunden zu unterlassen.
Du bist lange genug in der Delphi-PRAXIS um unsere Regeln zu kennen!
Stephan B.
"Lasst den Gänsen ihre Füßchen"
  Mit Zitat antworten Zitat
Benutzerbild von TheMiller
TheMiller

Registriert seit: 19. Mai 2003
Ort: Gründau
2.480 Beiträge
 
Delphi XE7 Architect
 
#9

Re: Variable aus dem Script in Delphi holen...

  Alt 1. Nov 2004, 15:31
Hm.. ja, du hast schon recht. Es kann sein, dass ich ein wenig ungeduldig bin. Ich werde es auch demnächst lassen, doch versetze dich mal in meine Lage, wenn du etwas programmieren willst und etwas (mit Sicherheit) ganz simpel ist und dich dein PC so zu sagen, nur veräppelt.

Naja gut, ich werde nicht mehr unter 24h pushen....

Aber jetzt sind sie doch rum, oder? Also nochmal.

Ich kennt euch doch so gut mit SQL und PHP aus. Wie kann ich ausgelesene Variablen im Delphiprogramm unter einzelnen Feldern (Edit) oder Labeln anzeigen lassen?

Ich stehe vor einem sehr großen Problem und einem noch größerem


So, will jetzt kein Staatsakt draus machen, aber da ich wirklich schon sehr lange hier dabei bin, möchte ich mich für mein Verhalten entschuldigen und denke, dass die Sache jetzt geregelt ist. Von meiner Seite ist sie das jedenfalls...

Bye!
  Mit Zitat antworten Zitat
Benutzerbild von jfheins
jfheins

Registriert seit: 10. Jun 2004
Ort: Garching (TUM)
4.579 Beiträge
 
#10

Re: Variable aus dem Script in Delphi holen...

  Alt 1. Nov 2004, 15:39
Sehe ich das jetzt richtig, dass sein Problem nicht darin bestegt, daten vom PHP-Script zu bekommen,
sondern vielmehr darin, die bekommenen Daten zu verarbeiten ?
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 1 von 2  1 2   

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 05:42 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