Hallo Leute
ich kling zwar ziemlich blöd aber ich kriegs einfach nicht mehr raus!!
Ich hab mir jetzt vor kurzem Turbo Delphi 2006 runtergeladen und wollt da mit was einfachem anfangen. Da dacht ich sofort an ein blinkendes Edit-Feld, was ich schon einmal in der Schule programmiert hatte, also habe ich ein Edit-Feld und einen Timer eingefügt. Der Quelltext dazu ist der hier:
Delphi-Quellcode:
unit Unit2;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, ExtCtrls, StdCtrls;
type
TForm2 =
class(TForm)
Timer1: TTimer;
Edit1: TEdit;
procedure Timer1Timer(Sender: TObject);
private
{ Private-Deklarationen }
public
{ Public-Deklarationen }
end;
var
Form2: TForm2;
implementation
{$R *.dfm}
procedure TForm2.Timer1Timer(Sender: TObject);
var r: integer;
begin
Randomize;
Random (1,16777216) := r;
edit1.color := r;
end;
end.
So oder so ähnlich hat ich das in Erinnerung. Danke für jede Hilfe, denn jedesmal wenn ich starten will kommt ein Fehlermeldung, weil es anscheinend zu viele Parameter gibt.
Mfg