Registriert seit: 25. Apr 2006
Ort: Bad Aibling
105 Beiträge
Delphi 10.1 Berlin Professional
|
AW: Einlesen von Private/Public
26. Sep 2014, 10: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.
|