Hallo,
ich bin die absolute Anfängerin und erst sein kurzem im Informatikurs in meiner Schule.
Nun soll ich ein Programm selbs programmieren.
Jetzt weiß ich aber nicht mehr weiter:
ich möchte das der eingegeben Name, den ich in Form1 in einem Editfeld eingebe als Panel in Form2 erscheint ...
aber i.wie bekomm ich das nicht hin ...
ich habe die Unit2 schon in die Unit1 eingebunden das klappt auch, aber alles andere nicht
ich hoffe ihr könnt mir helfen?! Ich brauche dringend eure Hilfe!
Ps. zu eurer Hilfe hab ich mein Quelltext beigefügt.
Code:
unit Unit1;
{$mode objfpc}{$H+}
interface
uses
Classes, SysUtils, FileUtil, LResources, Forms, Controls, Graphics, Dialogs,
StdCtrls, ExtCtrls;
type
{ TForm1 }
TForm1 = class(TForm)
SchliessenButton: TButton;
AbbrechenButton: TButton;
OkButton: TButton;
NameEdit: TEdit;
GroupBox1: TGroupBox;
WillkommenLabel: TLabel;
NameEingebenLabel: TLabel;
IchheisseLabel: TLabel;
QuizPanel: TPanel;
procedure AbbrechenButtonClick(Sender: TObject);
procedure OkButtonClick(Sender: TObject);
procedure SchliessenButtonClick(Sender: TObject);
private
{ private declarations }
public
{ public declarations }
end;
var
Form1: TForm1;
einName: String;
implementation
uses Unit2;
{ TForm1 }
procedure TForm1.OkButtonClick(Sender: TObject);
begin
end;
procedure TForm1.SchliessenButtonClick(Sender: TObject);
begin
hide;
end;
procedure TForm1.AbbrechenButtonClick(Sender: TObject);
begin
close;
end;
initialization
{$I Unit1.lrs}
end.