Buchstaben per Zufall verteilen

[Mitternachtsfalke]

Hi
Ich will eine Prozedur schreiben, die ein Wort mit 9 Buchstaben
zerlegt, und die Buchstaben per Zufall auf 9 Panels verteilt.
Dabei soll aber immer 1 bestimmter Buchstabe in ein bestimmtes
Panel kommen.

Die Prozedur sähe so aus:

Code:

procedure split(s: string; i: integer);
begin
  panel1.caption := s[i];
  :
  :

und sie restlichen Buchstaben werden zufällig auf die
restlichen Panels verteilt.

Ein Aufruf sollte später so aussehen:

Code:

split(GRUNDLAGE,4);

Hierbei käme das "N" in das Panel 1 und die anderen Buchstaben in die
anderen Panels.

Wie soll ich das denn mit der "zufälligen Verteilung" der restlichen
Buchstaben machen???

Gruß
Mitternachtsfalke