Jetzt habe ich es mit Delphi Vers. 7 versucht und habe einen Quellcode geschrieben und bin am verzweifeln.
Obwohl es der gleiche wie im Buch ist bekomme ich immer eine Fehlermeldung mit der ich nichts anfangen kann.
Cursor springt immer auf zeile 1 und unterlegt die rot obwohl das gleiche im Buch steht.
Was ist das nur?
Hier der Quellcode:
Delphi-Quellcode:
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TForm1 =
class(TForm)
Button1: TButton;
Button2: TButton;
Button3: TButton;
Button4: TButton;
Label2: TLabel;
Label3: TLabel;
Label1: TLabel;
procedure Label3Click(Sender: TObject);
private
{ Private-Deklarationen }
public
{ Public-Deklarationen }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.Label3Click(Sender: TObject);
begin
randomize;
Zahl1 := random (100);
Zahl2 := random (100);
Label1.Caption :=IntToStr(Zahl1);
Label2.Caption := IntToStr(Zahl2);
Label3.Caption := '
Wähle die Rechenart!';
end;
end.
Grüße
[edit=Sharky]Delphi-Tags korrigiert. Bitte in zukunft darauf achten. Mfg, Sharky[/edit]