Einzelnen Beitrag anzeigen

Nine9

Registriert seit: 1. Dez 2021
45 Beiträge
 
Delphi 10 Seattle Professional
 
#3

AW: Delphi Json Tutorial hilfe

  Alt 11. Mai 2022, 12:59
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.
  Mit Zitat antworten Zitat