Einzelnen Beitrag anzeigen

-=ZGD=-

Registriert seit: 25. Apr 2006
Ort: Bad Aibling
105 Beiträge
 
Delphi 10.1 Berlin Professional
 
#12

AW: Einlesen von Private/Public

  Alt 26. Sep 2014, 09:00
Glaub er meint wohl einfach, dass er 2 Editfelder, 1 Button und eine Listbox auf ein Formular gezogen hat.
Anschließend klickt er auf den Button.

Delphi-Quellcode:
unit Unit1;

interface

uses
  Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
  Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls;

type
  TForm1 = class(TForm)
    btn_execute: TButton;
    edit_klasse: TEdit;
    edit_feld: TEdit;
    list_data: TListBox;
    procedure btn_executeClick(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.btn_executeClick(Sender: TObject);
begin
  list_data.Items.Add(edit_klasse.Text + ' ' + edit_feld.text);
end;

end.
Stefan Michalk
Wer Provokationen, Ironie, Sarkasmus oder Zynismus herauslesen kann soll sie ignorieren um den Inhalt meiner Beiträge ungetrübt erfassen zu können.
  Mit Zitat antworten Zitat