Вопросы | 

Поиск

Через WMI, или используя утилиту wmic? А может есть еще какие более простые пути...

В Lazarus 0.9.31 и последующих код работы с UTF-8 находится в модуле lazutf8.

Пример:

uses LazUTF8; // В место uses LCLProc;

Программирование на Lazarus Лекция 6.

Здравствуйте, прохожу сейчас курс "Программирование на Lazarus", и столкнулся с проблемой. В конце 8й лекции дан пример кода программы для подсчета Индекса массы тела. там для ввода роста и веса использованы TMaskEdit. для ввода веса использована маска ###;1;_ позволяющая не вводить все три цифры, что логично - большинство людей все таки весит меньше сотки. на самом деле, изначально я и маску для роста изменил на менее жесткую (так как вроде и для детей формула подходит), но уже потом когда пошли ошибки вернул исходный вариант... в общем, в чем проблема: если в строку для ввода веса ввести не все три цифры (что допускает маска), то при выполнении программы получим ошибку (" "68" is an invalid integer "). как я понял ошибку выдает StrToInt(ME2.Text). причем что интересно, если не вписать первую из трех цифр то ошибки нет. тоесть 68_ нельзя а _68 можно. Можно ли это как-то победить? может информация в лекции просто устарела и в новых версиях Lazarus (у меня 1.8.2) нужно писать иначе?

Добрый день! 

Спасибо за Ваш замечательный курс!

В самостоятельной работе №2 при компиляции модуля MyCript.pas (ОС: Windows 7 x64, Lazarus 1.4 win64) выдается ошибка на код ассемблера

mycript.pas(54,5) Error: Asm: [push reg32] invalid combination of opcode and operands
mycript.pas(95,5) Error: Asm: [pop reg32] invalid combination of opcode and operands

Я понимаю, что курс готовился для 32 разрядных ОС, но как быть в случае 64 разрядных систем?

В обработчиках пунктов меню FileCreate и FileOpen, а также в обработчике закрытия формы OnClose - в этих трех процедурах содержится один и тот же код

  {Если есть изменения текста, спросим пользователя, не хочет ли он сохранить
  их перед созданием нового текста}
  if Memo1.Modified then begin
    //если пользователь согласен сохранить изменения:
    if MessageDlg('Сохранение файла',
                  'Текущий файл был изменен. Сохранить изменения?',
         mtConfirmation, [mbYes, mbNo, mbIgnore], 0) = mrYes then
            FileSaveClick(Sender);
  end; //if

Позвольте спросить: не лучше ли было бы вынести этот код в отдельную процедуру, например - в обработчик события формы OnCloseQuery? Насколько я помню по опыту Delphi, вызов этой процедуры сам по себе не должен приводить к закрытию формы. А значит, ее можно использовать и в процедурах очистки Memo1 и чтения из файла... Или в Lazarus так делать нельзя?

Цитата "если мы уберем скобки в первом примере:

if a = b or b then ShowMessage('Истина');

То сообщение "Истина" не будет выполнено. Ведь оператор IF делает только одну проверку, значит, он проверит только a = b. Часть условия с OR будет пропущена, потому что мы не заключили операнды в скобки" - конец цитаты

На самом деле проверяется всё выражение и ничего не будет пропущено, а причина в порядке выполнения логических операций - сначала выполняется OR а потом результат сравнивается с а.

Лекция 5 и ранее.

У вас в окне ShowMessage отображается значок с буквой "i". У меня - нет и ширина этого окна значительно больше. OC Windows-7 32 разряда, Лазарус 1.2.6, FPC 2.6.4. Почему так? 
 

Здравствуйте. Прохожу самостоятельную работу с телефонный справочником. Для чего создавать еще один раздел type? Можно ли добавить описание записей сразу после описания формы?

TFMain = class(TForm)
    Panel1: TPanel;
    bAdd: TSpeedButton;
    bEdit: TSpeedButton;
    bDel: TSpeedButton;
    bSort: TSpeedButton;
    SG: TStringGrid;
  private
    { private declarations }
  public
    { public declarations }
  end;

  //здесь

TContact = record

......

Прохожу самостаятельную работу с экранной заставкой, не могу понять почему у меня часы двигаються только по левому верхнему углу?

Лекция 3, часть 2.

Указанные в тексте настройки "У нашей Panel1 установим Align = alTop. Затем добавим на форму разделитель TSplitter, и также установим у него Align = alTop" многоточие, указывающее на перемещаемую сторону будут расположены в противоположной стороне от указанного на риснке, тоесть вверху а на рисунке в низу. Таже проблема и с левой панелью. Даже при изменение параметра Align элемента TSplitter на противоположный, при запуске программы границы форм не перемещаются, хотя указаль меняет свой вид, указывая на действие перемещения

Добрый день. Пытаюсь скачать программу. Все тщетно. Скачивал разные версии, но Нортон находит в скачиваемых файлах угрозу WS.Reputation.1 Что делать?(