Страница 2 из 2

Re: ругается на show и showmodal

Добавлено: 13.01.2011 17:37:58
Vadim
maser писал(а):Насчет поставить на работе - это вряд ли получится. Тут даже оперу нельзя поставить - админы режут на корню.

Чем хорош Lazarus (в отличие от Delphi :) ) - Вы просто копируете файлы с установленным где-нибудь уже Lazarus'ом в то же место на компьютере назначения, где он был на компьютере источнике. Всё будет работать. :) При желании, его можно устанавливать из исходников и простым копированием файлов компилятора и необходимых библиотек, не обладая правами админа. Правда здесь уже надо кое-чего понимать в настройках. Но понимание это отнюдь не сложное. ;)

Re: ругается на show и showmodal

Добавлено: 14.01.2011 00:10:37
Alexey_02

Код: Выделить всё

procedure TForm1.Button2Click(Sender:TObject);
begin
  if Not Assigned(form2) then Application.CreateForm(Tform2, form2);
  form2.Hide;
  try
    form2.ShowModal;
  except
    form2.Free;
    form := nil;
  end;
end;

Re: ругается на show и showmodal

Добавлено: 14.01.2011 00:35:02
maser
Вы просто копируете файлы с установленным где-нибудь уже Lazarus'ом в то же место на компьютере назначения, где он был на компьютере источнике. Всё будет работать. :)

Сейчас в wine поставлю в нужное место, затем на флешку и на работе скину в такую же папку - попробую запустить.

С функциями разобрался! Надо было просто тупо собрать проект. Все заработало! Спасибо всем за отклики и помощь!

Alexey_02, очень интересный код.