Logo
Explore Help
Register Sign In
pascal/lazarus-ccr
1
0
Fork 0
You've already forked lazarus-ccr
Code Issues Releases Activity
Files
901b92fa7253da596d484795c088fd52c0c54b41
lazarus-ccr/components/jvcllaz/examples/JvItemViewer/JvItemViewerDemo.lpr

18 lines
300 B
ObjectPascal
Raw Normal View History

jvcl: Add new components TJvImagesViewer, TJvImageListViewer, TJvCustomDrawViewer, ported by Michal Gawrycki (issue #34104). git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@6575 8e941d3f-bd1b-0410-a28a-d453659cc2b4
2018-08-09 17:01:40 +00:00
program JvItemViewerDemo;
{$MODE Delphi}
uses
Forms, Interfaces,
MainFrm in 'MainFrm.pas' {frmMain},
ViewerFrm in 'ViewerFrm.pas' {frmImageViewer};
{$R *.res}
begin
jvcllaz: Fix LCL scaling for JvItemViewer components. Adapt demo. git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@7290 8e941d3f-bd1b-0410-a28a-d453659cc2b4
2020-01-17 15:27:02 +00:00
Application.Scaled := true;
jvcl: Add new components TJvImagesViewer, TJvImageListViewer, TJvCustomDrawViewer, ported by Michal Gawrycki (issue #34104). git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@6575 8e941d3f-bd1b-0410-a28a-d453659cc2b4
2018-08-09 17:01:40 +00:00
Application.Initialize;
Application.CreateForm(TfrmMain, frmMain);
Application.Run;
end.
Reference in New Issue Copy Permalink
Powered by Gitea
English
Bahasa Indonesia Deutsch English Español Français Gaeilge Italiano Latviešu Magyar nyelv Nederlands Polski Português de Portugal Português do Brasil Suomi Svenska Türkçe Čeština Ελληνικά Български Русский Українська فارسی മലയാളം 日本語 简体中文 繁體中文(台灣) 繁體中文(香港) 한국어
Licenses API