Registriert seit: 8. Jan 2007
Ort: Schüler
12 Beiträge
Delphi 5 Standard
|
Re: Verstehe die Zählschleifen und VCL-Komponenten nicht-Sch
8. Jan 2007, 10:47
phoenix: entschuldige, bin eben erst angemeldet ^^
kenn mich nicht so aus.
Delphi-Quellcode:
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls;
type
TForm1 = class(TForm)
Label1: TLabel;
Button1: TButton;
Button2: TButton;
procedure FormCreate(Sender: TObject);
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
private
{ Private-Deklarationen }
public
{ Public-Deklarationen }
end;
var
Form1: TForm1;
implementation
{$R *.DFM}
procedure TForm1.FormCreate(Sender: TObject);
begin
randomize;
end;
procedure TForm1.Button1Click(Sender: TObject);
var M: set of byte;
a,b,c:Integer;
begin
M:=[1..40];
a:=random(41);
end;
procedure TForm1.Button2Click(Sender: TObject);
var n: Tcheckbox;
begin
n:=TCheckbox.Create(Form1);
n.parent:=Form1;
n.left:=100;
n.top:=100;
end;
end.
das steht in meim programm ^^
ich weiß.. ganz viel...
[edit=Phoenix][ Delphi ] - tags um den Code gesetzt. Bitte das nächste mal selber machen. Mfg, Phoenix[/edit]
Wer Rechtschreibfehler findet, darf sie behalten!
|
|
Zitat
|