Ich Danke dir aber die kenne ich leider schon und trotzdem blick ich nicht wirklich durchs Fenster.^^
vll kann mir jemand ein kleines beispiel einbauen wodurch ich mit der Eingabe bei Edit1 und 2 per Button werte in eine bestehende Json datei einlese.
Delphi-Quellcode:
unit Unit4;
interface
uses
Winapi.Windows,
Winapi.Messages, System.SysUtils, System.Variants,
Vcl.Graphics,
Vcl.Controls,
Vcl.Forms,
Vcl.Dialogs,
Vcl.StdCtrls, REST.Json,JSON,System.JSON.Writers,
System.Classes,System.JSON.Types;
type
TForm4 =
class(TForm)
Edit1: TEdit;
Edit2: TEdit;
Button1: TButton;
ListBox1: TListBox;
procedure Button1Click(Sender: TObject);
procedure FormActivate(Sender: TObject);
private
{ Private-Deklarationen }
public
{ Public-Deklarationen }
end;
var
Form4: TForm4;
implementation
{$R *.dfm}
procedure TForm4.Button1Click(Sender: TObject);
begin
end;
procedure TForm4.FormActivate(Sender: TObject);
begin
ListBox1.Items.Clear;
end;
end.