Из MessageBox в Form

[GrabbeR]

Результат выводится в сообщении. Как перенаправить его на другую форму?
Спасибо.

procedure TForm1.Button2Click(Sender: TObject);
var i,j: Integer;
StrResult,s:string;
begin
Button1Click(nil);
StrResult:='';
for j:=1 to 15 do
begin
s:='';
for i:=1 to 6 do
s:=s+' | '+IntToStr(Results[i,j]);
StrResult:=StrResult+s+#13#10;
end;
for i:=1 to 6 do
for j:=1 to 15 do
Results[i,j]:=0;
Application.MessageBox(pChar(StrRes ult),'Результат',MB_OK);
{ Form11:=tform11.create(application) ;
form11.show }
end;

[phomm]

Написать в принимающей форме метод, принимающий аргументом Вашу переменную с данными, в нужное время в исходной форме вызывать этот метод, передавая в него переменную.
Внутри метода - делаете что Вам нужно, чтобы отобразить данные.

Вот у Вас в коде указано form11.show вот и сделайте примерно то же самое только будет как-то так: form11.showmydata(StrResult);
Ну а в модуле и классе той формы надо объявить и реализовать этот метод.

Не забывайте для выделения кода использовать кнопку с картинкой символа #