Denkfehler? Erste Gehversuche nach langer Auszeit

[Jürgen Thomas]

Hallo,

was Dein Code machen soll, ist mir völlig unklar. Klar ist aber, dass Du offensichtlich Bestandteile des Formulars und des Programms wild durcheinander schmeißt. Vernünftig wäre etwa so etwas (ohne Überlegung, ob das Deinem Ziel entspricht):

Delphi-Quellcode:

unit BSG;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;

type
  TfrmMain = class(TForm)
    Label1: TLabel;
    SearchString: String;
    lblSearchTxt: TLabel;
    EdtSearchTxt: TEdit;
    BtnGo: TButton;
    BtnUpdate: TButton;

  private
    { Private declarations }
    procedure SearchText;
    procedure BtnGoClick(...);
  public
    { Public declarations }
  end;

var
  frmMain: TfrmMain;

implementation

{$R *.dfm}

procedure TfrmMain.SearchText;
begin
  //  das Folgende wäre eine doppelte Zuordnung
  SearchString := EdtSearchTxt.Text;
  SearchString := Label1.Caption;
end;

procedure TfrmMain.BtnGoClick(...);

end.

Empfehlung: Erzeuge mit Delphi zunächst eine neue Windows-Anwendung, also mit Formular. Gestalte dann dieses Formular (welche Controls kommen rein und wohin). Erst danach kommt die eigentliche Funktionalität, indem die passenden Ereignisse erzeugt und mit Inhalt gefüllt werden.

Gruß Jürgen