Recent

Author Topic: Internal error 200609171 macOS и ещё кучу хлама буду добавлять, что найду.  (Read 416 times)

Seenkao

  • Jr. Member
  • **
  • Posts: 90
Это ошибка при компиляции в MacOS при выборе неправильного дебаггера.

Где вообще смотреть какие ошибки и к чему они относятся? Надоедает в угадайку играть. Вроде развитая система, а ошибки, которые обычному пользователю не решить, ни где не прописаны.

Далее:
https://wiki.freepascal.org/FPC_PasCocoa
Code: Pascal  [Select][+][-]
  1. program simplewindow;
  2.  
  3. {$mode objfpc}{$H+}
  4. {$modeswitch objectivec2}
  5.  
  6. uses
  7.   CocoaAll;
  8.  
  9. var
  10.   appName: NSString;
  11.   window: NSWindow;
  12.   pool: NSAutoreleasePool;
  13. begin
  14.   pool := NSAutoreleasePool.new;
  15.   NSApp := NSApplication.sharedApplication;
  16.   NSApp.setActivationPolicy(NSApplicationActivationPolicyRegular);
  17.   appName := NSProcessInfo.processInfo.processName;
  18.   window := NSWindow.alloc.initWithContentRect_styleMask_backing_defer(NSMakeRect(0, 0, 200, 200),
  19.     NSTitledWindowMask, NSBackingStoreBuffered, False).autorelease;
  20.   window.center;
  21.   window.setTitle(appName);
  22.   window.makeKeyAndOrderFront(nil);
  23.   NSApp.activateIgnoringOtherApps(true);
  24.   NSApp.run;
  25. end.

работать не будет. Пока вы не пропишите NSApp, на всякий случай прописать
Code: Pascal  [Select][+][-]
  1. var
  2.   myNSApp: NSApplication;
и в коде заменить все NSApp на myNSApp

trev

  • Global Moderator
  • Hero Member
  • *****
  • Posts: 1052
  • Former Delphi 1-7, 10.2 User
Далее:
https://wiki.freepascal.org/FPC_PasCocoa
Code: Pascal  [Select][+][-]
  1. program simplewindow;
  2. [...]
  3. end.

работать не будет. Пока вы не пропишите NSApp, на всякий случай прописать
Code: Pascal  [Select][+][-]
  1. var
  2.   myNSApp: NSApplication;
и в коде заменить все NSApp на myNSApp

Эта программа у меня работает без изменений (FPC 3.0.4 и FPC 3.3.1).
o Lazarus v2.1.0 r63871, FPC v3.3.1 r47164, macOS 10.14.6 (with sup update), Xcode 11.3.1
o Lazarus v2.1.0 r61574, FPC v3.3.1 r42318, FreeBSD 12.1 amd64 (VMware Fusion VM)
o FPC 3.0.4, FreeBSD 12.2-STABLE r365646 amd64
o Lazarus v2.1.0 r61574, FPC v3.0.4, Ubuntu 20.04 (Parallels VM)

Seenkao

  • Jr. Member
  • **
  • Posts: 90
trev, это должно работать без объявления LCL-зависимости. У вас это так?

trev

  • Global Moderator
  • Hero Member
  • *****
  • Posts: 1052
  • Former Delphi 1-7, 10.2 User
Да, это правильно.
o Lazarus v2.1.0 r63871, FPC v3.3.1 r47164, macOS 10.14.6 (with sup update), Xcode 11.3.1
o Lazarus v2.1.0 r61574, FPC v3.3.1 r42318, FreeBSD 12.1 amd64 (VMware Fusion VM)
o FPC 3.0.4, FreeBSD 12.2-STABLE r365646 amd64
o Lazarus v2.1.0 r61574, FPC v3.0.4, Ubuntu 20.04 (Parallels VM)

Seenkao

  • Jr. Member
  • **
  • Posts: 90
Тогда я бы хотел узнать, откуда вы получили зависимость NSApp? Если проект не LCL, то зависимость проявляется как ссылка на объект в NSApplication, не как сама зависимость от NSApplication.

trev

  • Global Moderator
  • Hero Member
  • *****
  • Posts: 1052
  • Former Delphi 1-7, 10.2 User
Вы компилируете исходный код с помощью fpc, а не с помощью Lazarus.
« Last Edit: September 20, 2020, 03:14:19 pm by trev »
o Lazarus v2.1.0 r63871, FPC v3.3.1 r47164, macOS 10.14.6 (with sup update), Xcode 11.3.1
o Lazarus v2.1.0 r61574, FPC v3.3.1 r42318, FreeBSD 12.1 amd64 (VMware Fusion VM)
o FPC 3.0.4, FreeBSD 12.2-STABLE r365646 amd64
o Lazarus v2.1.0 r61574, FPC v3.0.4, Ubuntu 20.04 (Parallels VM)

Seenkao

  • Jr. Member
  • **
  • Posts: 90

 

TinyPortal © 2005-2018