Logo
Explore Help
Register Sign In
pascal/lazarus-ccr
1
0
Fork 0
You've already forked lazarus-ccr
Code Issues Releases Activity
Files
master
lazarus-ccr/components/tvplanit/examples/localization/translations_demo.lpr

22 lines
370 B
ObjectPascal
Raw Permalink Normal View History

tvplanit: Add a single-language translation demo project. git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@8557 8e941d3f-bd1b-0410-a28a-d453659cc2b4
2022-10-14 12:38:21 +00:00
program translations_demo;
{$mode objfpc}{$H+}
uses
{$IFDEF UNIX}{$IFDEF UseCThreads}
cthreads,
{$ENDIF}{$ENDIF}
Interfaces, // this includes the LCL widgetset
tvplanit: Activate LCLScaling in translations_demo. git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@8558 8e941d3f-bd1b-0410-a28a-d453659cc2b4
2022-10-14 12:46:29 +00:00
Forms, tdmain;
tvplanit: Add a single-language translation demo project. git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@8557 8e941d3f-bd1b-0410-a28a-d453659cc2b4
2022-10-14 12:38:21 +00:00
{$R *.res}
begin
RequireDerivedFormResource := True;
tvplanit: Activate LCLScaling in translations_demo. git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@8558 8e941d3f-bd1b-0410-a28a-d453659cc2b4
2022-10-14 12:46:29 +00:00
Application.Scaled:=True;
tvplanit: Add a single-language translation demo project. git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@8557 8e941d3f-bd1b-0410-a28a-d453659cc2b4
2022-10-14 12:38:21 +00:00
Application.Initialize;
Application.CreateForm(TMainForm, MainForm);
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