[*Caro*]

Hola de nuevo bothy, puedes utilizar un Case:

Código Delphi [-]
Randomize;
for I:=0 to 9 do
begin
  Numero:=Random(100)+1;
  Query.Close;
  Query.Sql.Text := 'Select First 1 * From (Select Skip '+IntToStr(Numero)+' * From Tabla)';
  Query.Open;
    
  Case I of
    0 : Label1.Caption := Query.FieldByName('pregunta').AsString;
    1 : Label2.Caption := Query.FieldByName('pregunta').AsString;
    2 : Label3.Caption := Query.FieldByName('pregunta').AsString;
    3 : Label4.Caption := Query.FieldByName('pregunta').AsString;
    ...................................................................................
  end;
end;

Saluditos