Einzelnen Beitrag anzeigen

globetrotter77

Registriert seit: 16. Jan 2009
Ort: Nürnberg
236 Beiträge
 
Delphi 10.3 Rio
 
#26

Re: Zufallszahl ziehen ohne wiederholung

  Alt 7. Feb 2009, 09:47
Zitat von walli18:
@ Globetrotter!
deine Antwort fand ich bis jetzt am besten, da sie für mich einigermaßen verständlich war!
ich weiß nur nicht, wo ich den teil mit
Delphi-Quellcode:
const gesamt=40;
      anzahl=15;
[b]hinpacken soll bei der deklaration!? Public, Private??
Du kannst sie sowohl im Public als auch im Private-Bereich unterbringen.
Da es sich aber um ganz einfache Definitionen handelt, die nicht unbedingt was mit der Klasse zu tun haben, geht es ebenso im implementation-Bereich, wobei du nur darauf achten musst, dass die Definition OBERHALB derjenigen Funktionen und Prozeduren steht, die darauf zugreifen!

z.B. so:
Delphi-Quellcode:
var
  Form1: TForm1;

implementation

{$R *.DFM}

const gesamt=40;
      anzahl=15;

var liste: string;

procedure TForm1.FormCreate(Sender: TObject);
begin
  Randomize;
  ButtonNeuClick(Sender);
end;
  Mit Zitat antworten Zitat