Delphi-Quellcode:
for i := 0 to 12345 do
begin
ShowMessage('dies ist die nervige Nachricht #' + inttostr(i));
end;
ist das Grundprinzip. Jetzt kannst du auch MessageBoxen, Forms:
Delphi-Quellcode:
var a: array[0..9999] of TForm;
for i := 0 to 9999 do
begin
a[i] := Tform.Create;
a[i].left := random(screen.width - a[i].width);
a[i].visible := true;
//das gleiche für height, caption, color, visible...
end;
oder wer weiß was machen...