Delphi +[mSum] randomize in einer Klasse einfügen

[Dro'Doog]

Für ein neues Schulprojekt muss ich in einer Klasse eine zufällige Zahl einfügen, ... als Lokalvariabel, ... da wir aber mit dem verkrüppelten mSum arbeiten, wäre mir sehr geholfen, wenn mir jemand sagen kann, wie ich den "randomize"-Befehl in einer Klasse einfüge (sollte analog zum normalen Delphi funktionieren), ...

Ich hoffe doch, jemand kann mir helfen?

 

[xenico]

Das mSum kenne ich jetz nicht, hab mal kurz bei google gesucht...

Aber um jetz auf das zu kommen, was ich verstanden habe - also von vornerein soll eine Klassenvariable einen zufälligen Wert bekommen (oder?) - denke ich mal, dass es so gehen sollte:

  TDing = class(TObject)
    zahl : integer;
    private
      constructor erzeuge(AOwner:TComponent);
      ...

im interface-Teil

und im implementation-Teil:

constructor erzeuge(AOwner:TComponent);
begin
  inherited Create;
  randomize;
  zahl := random(1000);
end;

Ich spekuliere, dass das klappen sollte