Forum: Netzwerke
by lucy,
22. Nov 2022
danke :-) schaue ich mir an!
teste gerade noch ein wenig, habe hier noch einen Fehler!
verstehe ich nicht ??
procedure TForm2.Button1Click(Sender: TObject);
var
ParamList : TStringStream;
begin
Forum: Netzwerke
by lucy,
22. Nov 2022
würde mich schon interessieren! habe aber leider noch nichts brauchbares gefunden.
Forum: Netzwerke
by lucy,
21. Nov 2022
Ja :oops: jetzt geht es! danke
Forum: Netzwerke
by lucy,
21. Nov 2022
nein hatte ich nicht.
procedure TForm2.Button1Click(Sender: TObject);
var
lParamList: TStringList;
begin
lParamList := TStringList.Create('{"日本語":42}',TEncoding.UTF8); // Fehlermeldung
lParamList.Add('{');
lParamList.Add('"message":"test message",');
Forum: Netzwerke
by lucy,
21. Nov 2022
der Code ist doch bekannt : :-)
procedure TForm2.Button1Click(Sender: TObject);
var
lParamList: TStringList;
begin
lParamList := TStringList.Create;
lParamList.Add('{');
lParamList.Add('"message":"test message",');
Forum: Netzwerke
by lucy,
21. Nov 2022
Sorry, die Fehlermeldung gehört nicht zum Projekt :oops:
es kommt keine Fehlermeldung mehr! trotzdem ohne Funktion :-(
Forum: Netzwerke
by lucy,
21. Nov 2022
geht nicht :-(
var
lParamList: TStringList;
begin
lParamList := TStringList.Create;
lParamList.Add('{');
lParamList.Add('"message":"test message",');
lParamList.Add('"type":"TEST",');
Forum: Netzwerke
by lucy,
21. Nov 2022
suche noch ein einfaches Beispiel :roll:
dieser quellcode funktioniert so leider nicht.
hier die Beschreibung:
https://alamos-support.atlassian.net/wiki/spaces/documentation/pages/219480068/Datenformat+Externe+Schnittstelle
procedure TForm2.Button1Click(Sender: TObject);
var
lParamList: TStringList;
Forum: Netzwerke
by lucy,
20. Nov 2022
vielen lieben Dank für Deine Hilfe :-)
der Code sieht sehr komplex aus! kannst du mir was zu den einzelnen zeilen erzählen? möchte diesen Code auch verstehen.
deshalbt wollte ich erstmal nur mit einer "Verbindung" + "Request vom Server" anfangen.
danke