├── .gitattributes ├── .gitignore ├── demos ├── kdbgrid │ ├── kdbgriddemo.dpr │ ├── kdbgriddemo.dproj │ ├── kdbgriddemo.res │ ├── kdbgriddemolaz.lpi │ ├── kdbgriddemolaz.lpr │ ├── kdbgriddemolaz.manifest │ ├── kdbgriddemolaz.rc │ ├── kdbgriddemolaz.res │ ├── main.dfm │ ├── main.pas │ └── xpman.res ├── kgrid │ ├── input.dfm │ ├── input.lfm │ ├── input.pas │ ├── kgriddemo.dpr │ ├── kgriddemo.dproj │ ├── kgriddemo.res │ ├── kgriddemo_rsrc.res │ ├── kgriddemolaz.lpi │ ├── kgriddemolaz.lpr │ ├── kgriddemolaz.manifest │ ├── kgriddemolaz.rc │ ├── kgriddemolaz.res │ ├── kgriddemolaz_rsrc.lrs │ ├── main.dfm │ ├── main.lfm │ ├── main.pas │ └── xpman.res ├── khexeditor │ ├── HexEditor.dpr │ ├── HexEditor.dproj │ ├── HexEditor.otares │ ├── HexEditor.res │ ├── HexEditor_Icon.ico │ ├── HexEditor_Icon1.ico │ ├── HexEditor_Icon2.ico │ ├── XPman.res │ ├── about.dfm │ ├── about.lfm │ ├── about.pas │ ├── basic.pas │ ├── hexeditor.ini │ ├── hexeditorlaz.lpi │ ├── hexeditorlaz.lpr │ ├── hexeditorlaz.manifest │ ├── hexeditorlaz.rc │ ├── kgriddemolaz.rc │ ├── main.dfm │ ├── main.lfm │ ├── main.pas │ ├── options.dfm │ ├── options.lfm │ ├── options.pas │ ├── printstatus.dfm │ ├── printstatus.lfm │ ├── printstatus.pas │ ├── replace.dfm │ ├── replace.lfm │ ├── replace.pas │ ├── replaceprompt.dfm │ ├── replaceprompt.lfm │ ├── replaceprompt.pas │ ├── res.pas │ ├── search.dfm │ ├── search.lfm │ └── search.pas ├── kicon │ ├── Demo.dpr │ ├── Demo.dproj │ ├── Demo.manifest │ ├── Demo.rc │ ├── Demo.res │ ├── DemoLaz.lpi │ ├── DemoLaz.lpr │ ├── DemoLaz.manifest │ ├── DemoLaz.rc │ ├── DemoLaz.res │ ├── Demo_Icon.ico │ ├── Main.dfm │ ├── Main.lfm │ ├── Main.pas │ └── XPman.res ├── kmemo │ ├── KMemoDemo.dpr │ ├── KMemoDemo.dproj │ ├── KMemoDemo.res │ ├── KMemoDemoLaz.lpi │ ├── KMemoDemoLaz.lpr │ ├── KMemoDemoLaz.res │ ├── Main.dfm │ ├── Main.lfm │ ├── Main.pas │ ├── kmemo_manual.rtf │ ├── kmemodemolaz.manifest │ ├── kmemodemolaz.rc │ └── penguins.jpg └── kmemoeditor │ ├── KMemoEditor.dpr │ ├── KMemoEditor.dproj │ ├── KMemoEditor.res │ ├── KMemoEditorLaz.lpi │ ├── KMemoEditorLaz.lpr │ ├── KMemoEditorLaz.res │ ├── Main.dfm │ ├── Main.lfm │ ├── Main.pas │ └── kmemo_manual.rtf ├── help ├── kcontrols │ └── KControls.chm ├── kgrid │ └── manual │ │ └── kgrid_manual.rtf └── kmemo │ └── manual │ └── kmemo_manual.rtf ├── kcontrols_readme.txt ├── kgrid_readme.txt ├── khexeditor_readme.txt ├── kicon_readme.txt ├── kmemo_readme.txt ├── packages └── kcontrols │ ├── KControlsDesign.dcr │ ├── KControls_CB2007.cbproj │ ├── KControls_CB2007.cpp │ ├── KControls_CB2007.res │ ├── KControls_CB2009.cbproj │ ├── KControls_CB2009.cpp │ ├── KControls_CB2009.res │ ├── KControls_CB_D6.cpp │ ├── KControls_CB_D6.res │ ├── KControls_CB_DXE.cbproj │ ├── KControls_CB_DXE.cpp │ ├── KControls_CB_R6.cpp │ ├── KControls_CB_R6.res │ ├── KControls_CB_RXE.cbproj │ ├── KControls_CB_RXE.cpp │ ├── KControls_D2005.dpk │ ├── KControls_D2006.dpk │ ├── KControls_D2007.dpk │ ├── KControls_D2007.res │ ├── KControls_D2009.dpk │ ├── KControls_D2009.res │ ├── KControls_D2010.dpk │ ├── KControls_D2010.res │ ├── KControls_D6.dpk │ ├── KControls_D6.res │ ├── KControls_D7.dpk │ ├── KControls_D7.res │ ├── KControls_DXE.dpk │ ├── KControls_DXE.dproj │ ├── KControls_DXE.res │ ├── KControls_DXE2.dpk │ ├── KControls_DXE2.res │ ├── KControls_DXE3.dpk │ ├── KControls_DXE4.dpk │ ├── KControls_DXE4.dproj │ ├── KControls_DXE4.res │ ├── KControls_DXE5.dpk │ ├── KControls_DXE5.dproj │ ├── KControls_DXE5.res │ ├── KControls_DXE6.dpk │ ├── KControls_DXE7.dpk │ ├── KControls_DXE8.dpk │ ├── KControls_DXE8.dproj │ ├── KControls_DXE8.res │ ├── KControls_R2005.dpk │ ├── KControls_R2006.dpk │ ├── KControls_R2007.dpk │ ├── KControls_R2007.res │ ├── KControls_R2009.dpk │ ├── KControls_R2009.res │ ├── KControls_R2010.dpk │ ├── KControls_R2010.res │ ├── KControls_R6.dpk │ ├── KControls_R6.res │ ├── KControls_R7.dpk │ ├── KControls_R7.res │ ├── KControls_RXE.dpk │ ├── KControls_RXE.dproj │ ├── KControls_RXE.res │ ├── KControls_RXE2.dpk │ ├── KControls_RXE2.res │ ├── KControls_RXE3.dpk │ ├── KControls_RXE4.dpk │ ├── KControls_RXE4.dproj │ ├── KControls_RXE4.res │ ├── KControls_RXE5.dpk │ ├── KControls_RXE5.dproj │ ├── KControls_RXE5.res │ ├── KControls_RXE6.dpk │ ├── KControls_RXE6.dproj │ ├── KControls_RXE6.res │ ├── KControls_RXE7.dpk │ ├── KControls_RXE8.dpk │ ├── KControls_RXE8.dproj │ ├── KControls_RXE8.res │ ├── KControls_XE4.groupproj │ ├── kcontrols.res │ ├── kcontrolsdesign.lrs │ ├── kcontrolsdesign.pas │ ├── kcontrolslaz.lpk │ ├── kgrids.res │ ├── kmessagebox.res │ ├── kpictureeditor.dfm │ └── kpictureeditor.pas ├── resource_src ├── clouds.jpg ├── kmessagebox_info.png ├── kmessagebox_question.png ├── kmessagebox_stop.png └── kmessagebox_warning.png └── source ├── kbuttons.pas ├── kcontrols.inc ├── kcontrols.lrs ├── kcontrols.pas ├── kcontrols.res ├── kdbgrids.pas ├── kdialogs.pas ├── keditcommon.pas ├── kedits.lrs ├── kedits.pas ├── kedits.res ├── kfunctions.pas ├── kgraphics.pas ├── kgrids.lrs ├── kgrids.pas ├── kgrids.res ├── khexeditor.pas ├── kicon.pas ├── klabels.pas ├── klog.pas ├── kmemo.pas ├── kmemodlghyperlink.dfm ├── kmemodlghyperlink.lfm ├── kmemodlghyperlink.pas ├── kmemodlgnumbering.dfm ├── kmemodlgnumbering.lfm ├── kmemodlgnumbering.pas ├── kmemodlgparastyle.dfm ├── kmemodlgparastyle.lfm ├── kmemodlgparastyle.pas ├── kmemodlgtextstyle.dfm ├── kmemodlgtextstyle.lfm ├── kmemodlgtextstyle.pas ├── kmemofrm.dfm ├── kmemofrm.lfm ├── kmemofrm.pas ├── kmemortf.pas ├── kmessagebox.lrs ├── kmessagebox.pas ├── kmessagebox.res ├── kpagecontrol.pas ├── kprintpreview.dfm ├── kprintpreview.lfm ├── kprintpreview.pas ├── kprintsetup.dfm ├── kprintsetup.lfm ├── kprintsetup.pas ├── kprogress.pas ├── kres.pas ├── ksplitter.pas ├── kwidewinprocs.pas └── xpman.res /.gitattributes: -------------------------------------------------------------------------------- 1 | # Auto detect text files and perform LF normalization 2 | * text=auto 3 | 4 | # Custom for Visual Studio 5 | *.cs diff=csharp 6 | 7 | # Standard to msysgit 8 | *.doc diff=astextplain 9 | *.DOC diff=astextplain 10 | *.docx diff=astextplain 11 | *.DOCX diff=astextplain 12 | *.dot diff=astextplain 13 | *.DOT diff=astextplain 14 | *.pdf diff=astextplain 15 | *.PDF diff=astextplain 16 | *.rtf diff=astextplain 17 | *.RTF diff=astextplain 18 | -------------------------------------------------------------------------------- /.gitignore: -------------------------------------------------------------------------------- 1 | # Uncomment these types if you want even more clean repository. But be careful. 2 | # It can make harm to an existing project source. Read explanations below. 3 | # 4 | # Resource files are binaries containing manifest, project icon and version info. 5 | # They can not be viewed as text or compared by diff-tools. Consider replacing them with .rc files. 6 | #*.res 7 | # 8 | # Type library file (binary). In old Delphi versions it should be stored. 9 | # Since Delphi 2009 it is produced from .ridl file and can safely be ignored. 10 | #*.tlb 11 | # 12 | # Diagram Portfolio file. Used by the diagram editor up to Delphi 7. 13 | # Uncomment this if you are not using diagrams or use newer Delphi version. 14 | #*.ddp 15 | # 16 | # Visual LiveBindings file. Added in Delphi XE2. 17 | # Uncomment this if you are not using LiveBindings Designer. 18 | #*.vlb 19 | # 20 | # Deployment Manager configuration file for your project. Added in Delphi XE2. 21 | # Uncomment this if it is not mobile development and you do not use remote debug feature. 22 | #*.deployproj 23 | # 24 | # C++ object files produced when C/C++ Output file generation is configured. 25 | # Uncomment this if you are not using external objects (zlib library for example). 26 | #*.obj 27 | # 28 | 29 | # Delphi compiler-generated binaries (safe to delete) 30 | *.exe 31 | *.dll 32 | *.bpl 33 | *.bpi 34 | *.dcp 35 | *.so 36 | *.apk 37 | *.drc 38 | *.map 39 | *.dres 40 | *.rsm 41 | *.tds 42 | *.dcu 43 | *.lib 44 | *.a 45 | *.o 46 | *.ocx 47 | 48 | # Delphi autogenerated files (duplicated info) 49 | *.cfg 50 | *.hpp 51 | *Resource.rc 52 | 53 | # Delphi local files (user-specific info) 54 | *.local 55 | *.identcache 56 | *.projdata 57 | *.tvsconfig 58 | *.dsk 59 | 60 | # Delphi history and backups 61 | __history/ 62 | __recovery/ 63 | *.~* 64 | 65 | # Castalia statistics file (since XE7 Castalia is distributed with Delphi) 66 | *.stat 67 | 68 | # ========================= 69 | # Operating System Files 70 | # ========================= 71 | 72 | # OSX 73 | # ========================= 74 | 75 | .DS_Store 76 | .AppleDouble 77 | .LSOverride 78 | 79 | # Thumbnails 80 | ._* 81 | 82 | # Files that might appear in the root of a volume 83 | .DocumentRevisions-V100 84 | .fseventsd 85 | .Spotlight-V100 86 | .TemporaryItems 87 | .Trashes 88 | .VolumeIcon.icns 89 | 90 | # Directories potentially created on remote AFP share 91 | .AppleDB 92 | .AppleDesktop 93 | Network Trash Folder 94 | Temporary Items 95 | .apdisk 96 | 97 | # Windows 98 | # ========================= 99 | 100 | # Windows image file caches 101 | Thumbs.db 102 | ehthumbs.db 103 | 104 | # Folder config file 105 | Desktop.ini 106 | 107 | # Recycle Bin used on file shares 108 | $RECYCLE.BIN/ 109 | 110 | # Windows Installer files 111 | *.cab 112 | *.msi 113 | *.msm 114 | *.msp 115 | 116 | # Windows shortcuts 117 | *.lnk 118 | -------------------------------------------------------------------------------- /demos/kdbgrid/kdbgriddemo.dpr: -------------------------------------------------------------------------------- 1 | program kdbgriddemo; 2 | 3 | {$include kcontrols.inc} 4 | 5 | uses 6 | Forms, 7 | main in 'main.pas' {MainForm}; 8 | 9 | {$R *.res} 10 | {$IFDEF USE_THEMES} 11 | {$R xpman.res} 12 | {$ENDIF} 13 | begin 14 | Application.Initialize; 15 | Application.CreateForm(TMainForm, MainForm); 16 | Application.Run; 17 | end. 18 | -------------------------------------------------------------------------------- /demos/kdbgrid/kdbgriddemo.dproj: -------------------------------------------------------------------------------- 1 |  2 | 3 | {CF894C77-3040-4C4F-8D24-9B0E02E994E5} 4 | kdbgriddemo.dpr 5 | True 6 | Debug 7 | Win32 8 | Application 9 | VCL 10 | DCC32 11 | 12.3 12 | 13 | 14 | true 15 | 16 | 17 | true 18 | Base 19 | true 20 | 21 | 22 | true 23 | Base 24 | true 25 | 26 | 27 | false 28 | 00400000 29 | WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;WinTypes=Windows;WinProcs=Windows;$(DCC_UnitAlias) 30 | false 31 | false 32 | false 33 | false 34 | 35 | 36 | false 37 | RELEASE;$(DCC_Define) 38 | 0 39 | false 40 | 41 | 42 | DEBUG;$(DCC_Define) 43 | false 44 | true 45 | 46 | 47 | 48 | MainSource 49 | 50 | 51 |
MainForm
52 | 53 | 54 | Cfg_2 55 | Base 56 | 57 | 58 | Base 59 | 60 | 61 | Cfg_1 62 | Base 63 | 64 | 65 | 66 | 67 | 68 | Delphi.Personality.12 69 | VCLApplication 70 | 71 | 72 | 73 | kdbgriddemo.dpr 74 | 75 | 76 | False 77 | False 78 | 1 79 | 0 80 | 0 81 | 0 82 | False 83 | False 84 | False 85 | False 86 | False 87 | 1029 88 | 1250 89 | 90 | 91 | 92 | 93 | 1.0.0.0 94 | 95 | 96 | 97 | 98 | 99 | 1.0.0.0 100 | 101 | 102 | 103 | 104 | True 105 | 106 | 107 | 12 108 | 109 | 110 | -------------------------------------------------------------------------------- /demos/kdbgrid/kdbgriddemo.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/demos/kdbgrid/kdbgriddemo.res -------------------------------------------------------------------------------- /demos/kdbgrid/kdbgriddemolaz.lpi: -------------------------------------------------------------------------------- 1 | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | 10 | <UseXPManifest Value="True"/> 11 | </General> 12 | <VersionInfo> 13 | <StringTable ProductVersion=""/> 14 | </VersionInfo> 15 | <BuildModes Count="1"> 16 | <Item1 Name="default" Default="True"/> 17 | </BuildModes> 18 | <PublishOptions> 19 | <Version Value="2"/> 20 | <IgnoreBinaries Value="False"/> 21 | <IncludeFileFilter Value="*.(pas|pp|inc|lfm|lpr|lrs|lpi|lpk|sh|xml)"/> 22 | <ExcludeFileFilter Value="*.(bak|ppu|ppw|o|so);*~;backup"/> 23 | </PublishOptions> 24 | <RunParams> 25 | <local> 26 | <FormatVersion Value="1"/> 27 | <LaunchingApplication PathPlusParams="\usr\X11R6\bin\xterm -T 'Lazarus Run Output' -e $(LazarusDir)\tools\runwait.sh $(TargetCmdLine)"/> 28 | </local> 29 | </RunParams> 30 | <RequiredPackages Count="4"> 31 | <Item1> 32 | <PackageName Value="KControlsLaz"/> 33 | </Item1> 34 | <Item2> 35 | <PackageName Value="SQLDBLaz"/> 36 | <MinVersion Major="1" Release="1" Valid="True"/> 37 | </Item2> 38 | <Item3> 39 | <PackageName Value="FCL"/> 40 | <MinVersion Major="1" Valid="True"/> 41 | </Item3> 42 | <Item4> 43 | <PackageName Value="LCL"/> 44 | </Item4> 45 | </RequiredPackages> 46 | <Units Count="2"> 47 | <Unit0> 48 | <Filename Value="kdbgriddemolaz.lpr"/> 49 | <IsPartOfProject Value="True"/> 50 | </Unit0> 51 | <Unit1> 52 | <Filename Value="main.pas"/> 53 | <IsPartOfProject Value="True"/> 54 | <ComponentName Value="MainForm"/> 55 | <HasResources Value="True"/> 56 | <ResourceBaseClass Value="Form"/> 57 | <UnitName Value="Main"/> 58 | </Unit1> 59 | </Units> 60 | </ProjectOptions> 61 | <CompilerOptions> 62 | <Version Value="11"/> 63 | <PathDelim Value="\"/> 64 | <Target> 65 | <Filename Value="kdbgriddemolaz"/> 66 | </Target> 67 | <SearchPaths> 68 | <IncludeFiles Value="$(ProjOutDir);..\..\source"/> 69 | <UnitOutputDirectory Value="lib\$(TargetCPU)-$(TargetOS)"/> 70 | </SearchPaths> 71 | <Parsing> 72 | <SyntaxOptions> 73 | <UseAnsiStrings Value="False"/> 74 | </SyntaxOptions> 75 | </Parsing> 76 | <Linking> 77 | <LinkSmart Value="True"/> 78 | <Options> 79 | <Win32> 80 | <GraphicApplication Value="True"/> 81 | </Win32> 82 | </Options> 83 | </Linking> 84 | <Other> 85 | <Verbosity> 86 | <ShowHints Value="False"/> 87 | </Verbosity> 88 | <CustomOptions Value="-dTK_TEST"/> 89 | <CompilerPath Value="$(CompPath)"/> 90 | </Other> 91 | </CompilerOptions> 92 | </CONFIG> 93 | -------------------------------------------------------------------------------- /demos/kdbgrid/kdbgriddemolaz.lpr: -------------------------------------------------------------------------------- 1 | program kdbgriddemolaz; 2 | 3 | {$include kcontrols.inc} 4 | 5 | uses 6 | Forms, Interfaces, 7 | Main in 'Main.pas'; 8 | 9 | {$R *.res} 10 | 11 | begin 12 | Application.Initialize; 13 | Application.CreateForm(TMainForm, MainForm); 14 | Application.Run; 15 | end. 16 | -------------------------------------------------------------------------------- /demos/kdbgrid/kdbgriddemolaz.manifest: -------------------------------------------------------------------------------- 1 | <?xml version="1.0" encoding="UTF-8" standalone="yes"?> 2 | <assembly xmlns="urn:schemas-microsoft-com:asm.v1" manifestVersion="1.0"> 3 | <assemblyIdentity version="1.0.0.0" processorArchitecture="*" name="CompanyName.ProductName.YourApp" type="win32"/> 4 | <description>Your application description here.</description> 5 | <dependency> 6 | <dependentAssembly> 7 | <assemblyIdentity type="win32" name="Microsoft.Windows.Common-Controls" version="6.0.0.0" processorArchitecture="*" publicKeyToken="6595b64144ccf1df" language="*"/> 8 | </dependentAssembly> 9 | </dependency> 10 | <trustInfo xmlns="urn:schemas-microsoft-com:asm.v3"> 11 | <security> 12 | <requestedPrivileges> 13 | <requestedExecutionLevel level="asInvoker" uiAccess="false"/> 14 | </requestedPrivileges> 15 | </security> 16 | </trustInfo> 17 | </assembly> -------------------------------------------------------------------------------- /demos/kdbgrid/kdbgriddemolaz.rc: -------------------------------------------------------------------------------- 1 | #define RT_MANIFEST 24 2 | #define CREATEPROCESS_MANIFEST_RESOURCE_ID 1 3 | #define ISOLATIONAWARE_MANIFEST_RESOURCE_ID 2 4 | #define ISOLATIONAWARE_NOSTATICIMPORT_MANIFEST_RESOURCE_ID 3 5 | 6 | CREATEPROCESS_MANIFEST_RESOURCE_ID RT_MANIFEST "kdbgriddemolaz.manifest" 7 | -------------------------------------------------------------------------------- /demos/kdbgrid/kdbgriddemolaz.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/demos/kdbgrid/kdbgriddemolaz.res -------------------------------------------------------------------------------- /demos/kdbgrid/xpman.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/demos/kdbgrid/xpman.res -------------------------------------------------------------------------------- /demos/kgrid/input.dfm: -------------------------------------------------------------------------------- 1 | object InputForm: TInputForm 2 | Left = 478 3 | Top = 395 4 | BorderStyle = bsDialog 5 | Caption = 'a' 6 | ClientHeight = 117 7 | ClientWidth = 278 8 | Color = clBtnFace 9 | Font.Charset = DEFAULT_CHARSET 10 | Font.Color = clWindowText 11 | Font.Height = -11 12 | Font.Name = 'Tahoma' 13 | Font.Style = [] 14 | OldCreateOrder = True 15 | Position = poScreenCenter 16 | OnCreate = FormCreate 17 | PixelsPerInch = 96 18 | TextHeight = 13 19 | object Label1: TLabel 20 | Left = 16 21 | Top = 16 22 | Width = 87 23 | Height = 13 24 | Caption = 'Enter column title:' 25 | Color = clBtnFace 26 | ParentColor = False 27 | end 28 | object Edit1: TEdit 29 | Left = 16 30 | Top = 32 31 | Width = 249 32 | Height = 21 33 | TabOrder = 0 34 | end 35 | object Button1: TButton 36 | Left = 56 37 | Top = 72 38 | Width = 75 39 | Height = 25 40 | Caption = '&OK' 41 | Default = True 42 | ModalResult = 1 43 | TabOrder = 1 44 | end 45 | object Button2: TButton 46 | Left = 144 47 | Top = 72 48 | Width = 75 49 | Height = 25 50 | Cancel = True 51 | Caption = 'Cancel' 52 | ModalResult = 2 53 | TabOrder = 2 54 | end 55 | end 56 | -------------------------------------------------------------------------------- /demos/kgrid/input.lfm: -------------------------------------------------------------------------------- 1 | object InputForm: TInputForm 2 | Left = 372 3 | Height = 117 4 | Top = 495 5 | Width = 278 6 | ActiveControl = Edit1 7 | BorderStyle = bsDialog 8 | Caption = 'a' 9 | ClientHeight = 117 10 | ClientWidth = 278 11 | Font.Height = -11 12 | Font.Name = 'Tahoma' 13 | OnCreate = FormCreate 14 | Position = poScreenCenter 15 | LCLVersion = '0.9.29' 16 | object Label1: TLabel 17 | Left = 16 18 | Height = 14 19 | Top = 16 20 | Width = 88 21 | Caption = 'Enter column title:' 22 | ParentColor = False 23 | end 24 | object Edit1: TEdit 25 | Left = 16 26 | Height = 21 27 | Top = 32 28 | Width = 249 29 | TabOrder = 0 30 | end 31 | object Button1: TButton 32 | Left = 56 33 | Height = 25 34 | Top = 72 35 | Width = 75 36 | Caption = '&OK' 37 | Default = True 38 | ModalResult = 1 39 | TabOrder = 1 40 | end 41 | object Button2: TButton 42 | Left = 144 43 | Height = 25 44 | Top = 72 45 | Width = 75 46 | Cancel = True 47 | Caption = 'Cancel' 48 | ModalResult = 2 49 | TabOrder = 2 50 | end 51 | end 52 | -------------------------------------------------------------------------------- /demos/kgrid/input.pas: -------------------------------------------------------------------------------- 1 | unit Input; 2 | 3 | {$include KControls.inc} 4 | 5 | interface 6 | 7 | uses 8 | SysUtils, Classes, Graphics, Controls, Forms, 9 | Dialogs, StdCtrls 10 | {$IFDEF FPC} 11 | , LResources 12 | {$ENDIF} 13 | ; 14 | 15 | type 16 | TInputForm = class(TForm) 17 | Label1: TLabel; 18 | Edit1: TEdit; 19 | Button1: TButton; 20 | Button2: TButton; 21 | procedure FormCreate(Sender: TObject); 22 | private 23 | { Private declarations } 24 | public 25 | { Public declarations } 26 | end; 27 | 28 | var 29 | InputForm: TInputForm; 30 | 31 | implementation 32 | 33 | {$IFDEF FPC} 34 | {$R *.lfm} 35 | {$ELSE} 36 | {$R *.dfm} 37 | {$ENDIF} 38 | 39 | uses 40 | Main; 41 | 42 | procedure TInputForm.FormCreate(Sender: TObject); 43 | begin 44 | Caption := Form1.Caption; 45 | end; 46 | 47 | end. 48 | -------------------------------------------------------------------------------- /demos/kgrid/kgriddemo.dpr: -------------------------------------------------------------------------------- 1 | program kgriddemo; 2 | 3 | {$include kcontrols.inc} 4 | 5 | uses 6 | Forms, 7 | main in 'main.pas' {Form1}, 8 | input in 'input.pas' {InputForm}; 9 | 10 | {$R *.res} 11 | {$IFDEF USE_THEMES} 12 | {$R xpman.res} 13 | {$ENDIF} 14 | begin 15 | {$IFDEF COMPILER10_UP} 16 | ReportMemoryLeaksOnShutdown := DebugHook <> 0; 17 | {$ENDIF} 18 | Application.Initialize; 19 | Application.CreateForm(TForm1, Form1); 20 | Application.CreateForm(TInputForm, InputForm); 21 | Application.Run; 22 | end. 23 | -------------------------------------------------------------------------------- /demos/kgrid/kgriddemo.dproj: -------------------------------------------------------------------------------- 1 |  <Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003"> 2 | <PropertyGroup> 3 | <ProjectGuid>{7B98D81D-EFAD-458F-9BC2-191E7DB3F74E}</ProjectGuid> 4 | <MainSource>kgriddemo.dpr</MainSource> 5 | <Base>True</Base> 6 | <Config Condition="'$(Config)'==''">Debug</Config> 7 | <Platform>Win32</Platform> 8 | <AppType>Application</AppType> 9 | <FrameworkType>VCL</FrameworkType> 10 | <DCC_DCCCompiler>DCC32</DCC_DCCCompiler> 11 | <ProjectVersion>12.3</ProjectVersion> 12 | </PropertyGroup> 13 | <PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''"> 14 | <Base>true</Base> 15 | </PropertyGroup> 16 | <PropertyGroup Condition="'$(Config)'=='Release' or '$(Cfg_1)'!=''"> 17 | <Cfg_1>true</Cfg_1> 18 | <CfgParent>Base</CfgParent> 19 | <Base>true</Base> 20 | </PropertyGroup> 21 | <PropertyGroup Condition="'$(Config)'=='Debug' or '$(Cfg_2)'!=''"> 22 | <Cfg_2>true</Cfg_2> 23 | <CfgParent>Base</CfgParent> 24 | <Base>true</Base> 25 | </PropertyGroup> 26 | <PropertyGroup Condition="'$(Base)'!=''"> 27 | <DCC_E>false</DCC_E> 28 | <DCC_ImageBase>00400000</DCC_ImageBase> 29 | <DCC_UnitAlias>WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;WinTypes=Windows;WinProcs=Windows;$(DCC_UnitAlias)</DCC_UnitAlias> 30 | <DCC_F>false</DCC_F> 31 | <DCC_S>false</DCC_S> 32 | <DCC_N>false</DCC_N> 33 | <DCC_K>false</DCC_K> 34 | </PropertyGroup> 35 | <PropertyGroup Condition="'$(Cfg_1)'!=''"> 36 | <DCC_LocalDebugSymbols>false</DCC_LocalDebugSymbols> 37 | <DCC_Define>RELEASE;$(DCC_Define)</DCC_Define> 38 | <DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo> 39 | <DCC_DebugInformation>false</DCC_DebugInformation> 40 | </PropertyGroup> 41 | <PropertyGroup Condition="'$(Cfg_2)'!=''"> 42 | <DCC_Define>DEBUG;$(DCC_Define)</DCC_Define> 43 | <DCC_Optimize>false</DCC_Optimize> 44 | <DCC_GenerateStackFrames>true</DCC_GenerateStackFrames> 45 | </PropertyGroup> 46 | <ItemGroup> 47 | <DelphiCompile Include="kgriddemo.dpr"> 48 | <MainSource>MainSource</MainSource> 49 | </DelphiCompile> 50 | <DCCReference Include="main.pas"> 51 | <Form>Form1</Form> 52 | </DCCReference> 53 | <DCCReference Include="input.pas"> 54 | <Form>InputForm</Form> 55 | </DCCReference> 56 | <BuildConfiguration Include="Debug"> 57 | <Key>Cfg_2</Key> 58 | <CfgParent>Base</CfgParent> 59 | </BuildConfiguration> 60 | <BuildConfiguration Include="Base"> 61 | <Key>Base</Key> 62 | </BuildConfiguration> 63 | <BuildConfiguration Include="Release"> 64 | <Key>Cfg_1</Key> 65 | <CfgParent>Base</CfgParent> 66 | </BuildConfiguration> 67 | </ItemGroup> 68 | <Import Condition="Exists('$(BDS)\Bin\CodeGear.Delphi.Targets')" Project="$(BDS)\Bin\CodeGear.Delphi.Targets"/> 69 | <Import Condition="Exists('$(APPDATA)\Embarcadero\$(BDSAPPDATABASEDIR)\$(PRODUCTVERSION)\UserTools.proj')" Project="$(APPDATA)\Embarcadero\$(BDSAPPDATABASEDIR)\$(PRODUCTVERSION)\UserTools.proj"/> 70 | <ProjectExtensions> 71 | <Borland.Personality>Delphi.Personality.12</Borland.Personality> 72 | <Borland.ProjectType>VCLApplication</Borland.ProjectType> 73 | <BorlandProject> 74 | <Delphi.Personality> 75 | <Source> 76 | <Source Name="MainSource">kgriddemo.dpr</Source> 77 | </Source> 78 | <VersionInfo> 79 | <VersionInfo Name="IncludeVerInfo">False</VersionInfo> 80 | <VersionInfo Name="AutoIncBuild">False</VersionInfo> 81 | <VersionInfo Name="MajorVer">1</VersionInfo> 82 | <VersionInfo Name="MinorVer">0</VersionInfo> 83 | <VersionInfo Name="Release">0</VersionInfo> 84 | <VersionInfo Name="Build">0</VersionInfo> 85 | <VersionInfo Name="Debug">False</VersionInfo> 86 | <VersionInfo Name="PreRelease">False</VersionInfo> 87 | <VersionInfo Name="Special">False</VersionInfo> 88 | <VersionInfo Name="Private">False</VersionInfo> 89 | <VersionInfo Name="DLL">False</VersionInfo> 90 | <VersionInfo Name="Locale">1029</VersionInfo> 91 | <VersionInfo Name="CodePage">1250</VersionInfo> 92 | </VersionInfo> 93 | <VersionInfoKeys> 94 | <VersionInfoKeys Name="CompanyName"/> 95 | <VersionInfoKeys Name="FileDescription"/> 96 | <VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys> 97 | <VersionInfoKeys Name="InternalName"/> 98 | <VersionInfoKeys Name="LegalCopyright"/> 99 | <VersionInfoKeys Name="LegalTrademarks"/> 100 | <VersionInfoKeys Name="OriginalFilename"/> 101 | <VersionInfoKeys Name="ProductName"/> 102 | <VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys> 103 | <VersionInfoKeys Name="Comments"/> 104 | </VersionInfoKeys> 105 | </Delphi.Personality> 106 | <Platforms> 107 | <Platform value="Win32">True</Platform> 108 | </Platforms> 109 | </BorlandProject> 110 | <ProjectFileVersion>12</ProjectFileVersion> 111 | </ProjectExtensions> 112 | </Project> 113 | -------------------------------------------------------------------------------- /demos/kgrid/kgriddemo.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/demos/kgrid/kgriddemo.res -------------------------------------------------------------------------------- /demos/kgrid/kgriddemo_rsrc.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/demos/kgrid/kgriddemo_rsrc.res -------------------------------------------------------------------------------- /demos/kgrid/kgriddemolaz.lpr: -------------------------------------------------------------------------------- 1 | program kgriddemolaz; 2 | 3 | uses 4 | Interfaces, Printer4Lazarus, 5 | Forms, 6 | Main in 'main.pas', 7 | Input in 'input.pas'; 8 | 9 | {$R *.res} 10 | 11 | begin 12 | Application.Initialize; 13 | Application.CreateForm(TForm1, Form1); 14 | Application.CreateForm(TInputForm, InputForm); 15 | Application.Run; 16 | end. 17 | -------------------------------------------------------------------------------- /demos/kgrid/kgriddemolaz.manifest: -------------------------------------------------------------------------------- 1 | <?xml version="1.0" encoding="UTF-8" standalone="yes"?> 2 | <assembly xmlns="urn:schemas-microsoft-com:asm.v1" manifestVersion="1.0"> 3 | <assemblyIdentity version="1.0.0.0" processorArchitecture="*" name="CompanyName.ProductName.YourApp" type="win32"/> 4 | <description>Your application description here.</description> 5 | <dependency> 6 | <dependentAssembly> 7 | <assemblyIdentity type="win32" name="Microsoft.Windows.Common-Controls" version="6.0.0.0" processorArchitecture="*" publicKeyToken="6595b64144ccf1df" language="*"/> 8 | </dependentAssembly> 9 | </dependency> 10 | <trustInfo xmlns="urn:schemas-microsoft-com:asm.v3"> 11 | <security> 12 | <requestedPrivileges> 13 | <requestedExecutionLevel level="asInvoker" uiAccess="false"/> 14 | </requestedPrivileges> 15 | </security> 16 | </trustInfo> 17 | </assembly> -------------------------------------------------------------------------------- /demos/kgrid/kgriddemolaz.rc: -------------------------------------------------------------------------------- 1 | #define RT_MANIFEST 24 2 | #define CREATEPROCESS_MANIFEST_RESOURCE_ID 1 3 | #define ISOLATIONAWARE_MANIFEST_RESOURCE_ID 2 4 | #define ISOLATIONAWARE_NOSTATICIMPORT_MANIFEST_RESOURCE_ID 3 5 | 6 | CREATEPROCESS_MANIFEST_RESOURCE_ID RT_MANIFEST "kgriddemolaz.manifest" 7 | -------------------------------------------------------------------------------- /demos/kgrid/kgriddemolaz.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/demos/kgrid/kgriddemolaz.res -------------------------------------------------------------------------------- /demos/kgrid/kgriddemolaz_rsrc.lrs: -------------------------------------------------------------------------------- 1 | LazarusResources.Add('_cube','BMP',[ 2 | 'BM6'#4#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#16#0#0#0#16#0#0#0#1#0' '#0#0#0#0#0#0#4#0 3 | +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0 4 | +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0 5 | +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0 6 | +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0 7 | +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#190#165#140#255#190#165#140#255#190#165 8 | +#140#255#190#165#140#255#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0 9 | +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#190#165#140#255#190#165#140#255#198#166#135#255 10 | +#210#169#129#255#175#145'r'#255#184#157#129#255#190#165#140#255#190#165#140 11 | +#255#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#190#165#140#255#190#165 12 | +#140#255#198#166#135#255#210#169#129#255#210#169#129#255#210#169#129#255#175 13 | +#145'r'#255#175#145'r'#255#175#145'r'#255#184#157#129#255#190#165#140#255#190 14 | +#165#140#255#0#0#0#0#0#0#0#0#0#0#0#0#190#165#140#255#198#166#135#255#210#169 15 | +#129#255#210#169#129#255#210#169#129#255#210#169#129#255#210#169#129#255#175 16 | +#145'r'#255#175#145'r'#255#175#145'r'#255#175#145'r'#255#175#145'r'#255#184 17 | +#157#129#255#190#165#140#255#0#0#0#0#0#0#0#0#190#165#140#255#210#169#129#255 18 | +#210#169#129#255#210#169#129#255#210#169#129#255#210#169#129#255#210#169#129 19 | +#255#175#145'r'#255#175#145'r'#255#175#145'r'#255#175#145'r'#255#175#145'r' 20 | +#255#175#145'r'#255#190#165#140#255#0#0#0#0#0#0#0#0#190#165#140#255#210#169 21 | +#129#255#210#169#129#255#210#169#129#255#210#169#129#255#210#169#129#255#210 22 | +#169#129#255#175#145'r'#255#175#145'r'#255#175#145'r'#255#175#145'r'#255#175 23 | +#145'r'#255#175#145'r'#255#190#165#140#255#0#0#0#0#0#0#0#0#190#165#140#255 24 | +#210#169#129#255#210#169#129#255#210#169#129#255#210#169#129#255#210#169#129 25 | +#255#210#169#129#255#175#145'r'#255#175#145'r'#255#175#145'r'#255#175#145'r' 26 | +#255#175#145'r'#255#175#145'r'#255#190#165#140#255#0#0#0#0#0#0#0#0#190#165 27 | +#140#255#210#169#129#255#210#169#129#255#210#169#129#255#210#169#129#255#250 28 | +#245#240#255#231#207#185#255#231#207#185#255#231#207#185#255#175#145'r'#255 29 | +#175#145'r'#255#175#145'r'#255#175#145'r'#255#190#165#140#255#0#0#0#0#0#0#0#0 30 | +#190#165#140#255#210#169#129#255#210#169#129#255#250#245#240#255#250#245#240 31 | +#255#250#245#240#255#231#207#185#255#231#207#185#255#231#207#185#255#231#207 32 | +#185#255#231#207#185#255#175#145'r'#255#175#145'r'#255#190#165#140#255#0#0#0 33 | +#0#0#0#0#0#190#165#140#255#215#198#181#255#250#245#240#255#250#245#240#255 34 | +#250#245#240#255#250#245#240#255#231#207#185#255#231#207#185#255#231#207#185 35 | +#255#231#207#185#255#231#207#185#255#231#207#185#255#207#182#158#255#190#165 36 | +#140#255#0#0#0#0#0#0#0#0#0#0#0#0#190#165#140#255#190#165#140#255#215#198#181 37 | +#255#250#245#240#255#250#245#240#255#231#207#185#255#231#207#185#255#231#207 38 | +#185#255#231#207#185#255#207#182#158#255#190#165#140#255#190#165#140#255#0#0 39 | +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#190#165#140#255#190#165#140#255 40 | +#215#198#181#255#231#207#185#255#231#207#185#255#207#182#158#255#190#165#140 41 | +#255#190#165#140#255#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0 42 | +#0#0#0#0#0#0#0#0#0#0#0#0#190#165#140#255#190#165#140#255#190#165#140#255#190 43 | +#165#140#255#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0 44 | +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0 45 | +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0 46 | ]); 47 | -------------------------------------------------------------------------------- /demos/kgrid/xpman.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/demos/kgrid/xpman.res -------------------------------------------------------------------------------- /demos/khexeditor/HexEditor.dpr: -------------------------------------------------------------------------------- 1 | program HexEditor; 2 | 3 | {$include kcontrols.inc} 4 | 5 | uses 6 | Forms, 7 | Res in 'Res.pas', 8 | Basic in 'Basic.pas', 9 | About in 'About.pas' {AboutForm}, 10 | Search in 'Search.pas' {SearchForm}, 11 | Replace in 'Replace.pas' {ReplaceForm}, 12 | Options in 'Options.pas' {OptionsForm}, 13 | ReplacePrompt in 'ReplacePrompt.pas' {ReplacePromptForm}, 14 | Main in 'Main.pas' {MainForm}, 15 | PrintStatus in 'PrintStatus.pas' {PrintStatusForm}; 16 | 17 | {$R *.res} 18 | {$IFDEF USE_THEMES} 19 | {$R xpman.res} 20 | {$ENDIF} 21 | begin 22 | {$IFDEF COMPILER10_UP} 23 | ReportMemoryLeaksOnShutdown := DebugHook <> 0; 24 | {$ENDIF} 25 | Application.Initialize; 26 | Application.CreateForm(TMainForm, MainForm); 27 | Application.CreateForm(TSearchForm, SearchForm); 28 | Application.CreateForm(TReplaceForm, ReplaceForm); 29 | Application.CreateForm(TAboutForm, AboutForm); 30 | Application.CreateForm(TOptionsForm, OptionsForm); 31 | Application.CreateForm(TReplacePromptForm, ReplacePromptForm); 32 | Application.CreateForm(TPrintStatusForm, PrintStatusForm); 33 | Application.Run; 34 | end. 35 | -------------------------------------------------------------------------------- /demos/khexeditor/HexEditor.dproj: -------------------------------------------------------------------------------- 1 |  <Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003"> 2 | <PropertyGroup> 3 | <ProjectGuid>{D19131C5-717C-43DA-80D7-FAEA914258B8}</ProjectGuid> 4 | <MainSource>HexEditor.dpr</MainSource> 5 | <Base>True</Base> 6 | <Config Condition="'$(Config)'==''">Debug</Config> 7 | <Platform>Win32</Platform> 8 | <AppType>Application</AppType> 9 | <FrameworkType>VCL</FrameworkType> 10 | <DCC_DCCCompiler>DCC32</DCC_DCCCompiler> 11 | <ProjectVersion>12.3</ProjectVersion> 12 | </PropertyGroup> 13 | <PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''"> 14 | <Base>true</Base> 15 | </PropertyGroup> 16 | <PropertyGroup Condition="'$(Config)'=='Release' or '$(Cfg_1)'!=''"> 17 | <Cfg_1>true</Cfg_1> 18 | <CfgParent>Base</CfgParent> 19 | <Base>true</Base> 20 | </PropertyGroup> 21 | <PropertyGroup Condition="'$(Config)'=='Debug' or '$(Cfg_2)'!=''"> 22 | <Cfg_2>true</Cfg_2> 23 | <CfgParent>Base</CfgParent> 24 | <Base>true</Base> 25 | </PropertyGroup> 26 | <PropertyGroup Condition="'$(Base)'!=''"> 27 | <DCC_E>false</DCC_E> 28 | <DCC_ImageBase>00400000</DCC_ImageBase> 29 | <DCC_UnitAlias>WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;WinTypes=Windows;WinProcs=Windows;$(DCC_UnitAlias)</DCC_UnitAlias> 30 | <DCC_F>false</DCC_F> 31 | <DCC_S>false</DCC_S> 32 | <DCC_N>false</DCC_N> 33 | <DCC_K>false</DCC_K> 34 | </PropertyGroup> 35 | <PropertyGroup Condition="'$(Cfg_1)'!=''"> 36 | <DCC_LocalDebugSymbols>false</DCC_LocalDebugSymbols> 37 | <DCC_Define>RELEASE;$(DCC_Define)</DCC_Define> 38 | <DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo> 39 | <DCC_DebugInformation>false</DCC_DebugInformation> 40 | </PropertyGroup> 41 | <PropertyGroup Condition="'$(Cfg_2)'!=''"> 42 | <DCC_Define>DEBUG;$(DCC_Define)</DCC_Define> 43 | <DCC_Optimize>false</DCC_Optimize> 44 | <DCC_GenerateStackFrames>true</DCC_GenerateStackFrames> 45 | </PropertyGroup> 46 | <ItemGroup> 47 | <DelphiCompile Include="HexEditor.dpr"> 48 | <MainSource>MainSource</MainSource> 49 | </DelphiCompile> 50 | <DCCReference Include="Res.pas"/> 51 | <DCCReference Include="Basic.pas"/> 52 | <DCCReference Include="About.pas"> 53 | <Form>AboutForm</Form> 54 | </DCCReference> 55 | <DCCReference Include="Search.pas"> 56 | <Form>SearchForm</Form> 57 | </DCCReference> 58 | <DCCReference Include="Replace.pas"> 59 | <Form>ReplaceForm</Form> 60 | </DCCReference> 61 | <DCCReference Include="Options.pas"> 62 | <Form>OptionsForm</Form> 63 | </DCCReference> 64 | <DCCReference Include="ReplacePrompt.pas"> 65 | <Form>ReplacePromptForm</Form> 66 | </DCCReference> 67 | <DCCReference Include="Main.pas"> 68 | <Form>MainForm</Form> 69 | </DCCReference> 70 | <DCCReference Include="PrintStatus.pas"> 71 | <Form>PrintStatusForm</Form> 72 | </DCCReference> 73 | <BuildConfiguration Include="Debug"> 74 | <Key>Cfg_2</Key> 75 | <CfgParent>Base</CfgParent> 76 | </BuildConfiguration> 77 | <BuildConfiguration Include="Base"> 78 | <Key>Base</Key> 79 | </BuildConfiguration> 80 | <BuildConfiguration Include="Release"> 81 | <Key>Cfg_1</Key> 82 | <CfgParent>Base</CfgParent> 83 | </BuildConfiguration> 84 | </ItemGroup> 85 | <Import Condition="Exists('$(BDS)\Bin\CodeGear.Delphi.Targets')" Project="$(BDS)\Bin\CodeGear.Delphi.Targets"/> 86 | <Import Condition="Exists('$(APPDATA)\Embarcadero\$(BDSAPPDATABASEDIR)\$(PRODUCTVERSION)\UserTools.proj')" Project="$(APPDATA)\Embarcadero\$(BDSAPPDATABASEDIR)\$(PRODUCTVERSION)\UserTools.proj"/> 87 | <ProjectExtensions> 88 | <Borland.Personality>Delphi.Personality.12</Borland.Personality> 89 | <Borland.ProjectType>VCLApplication</Borland.ProjectType> 90 | <BorlandProject> 91 | <Delphi.Personality> 92 | <Source> 93 | <Source Name="MainSource">HexEditor.dpr</Source> 94 | </Source> 95 | <VersionInfo> 96 | <VersionInfo Name="IncludeVerInfo">True</VersionInfo> 97 | <VersionInfo Name="AutoIncBuild">False</VersionInfo> 98 | <VersionInfo Name="MajorVer">1</VersionInfo> 99 | <VersionInfo Name="MinorVer">0</VersionInfo> 100 | <VersionInfo Name="Release">0</VersionInfo> 101 | <VersionInfo Name="Build">0</VersionInfo> 102 | <VersionInfo Name="Debug">False</VersionInfo> 103 | <VersionInfo Name="PreRelease">False</VersionInfo> 104 | <VersionInfo Name="Special">False</VersionInfo> 105 | <VersionInfo Name="Private">False</VersionInfo> 106 | <VersionInfo Name="DLL">False</VersionInfo> 107 | <VersionInfo Name="Locale">1029</VersionInfo> 108 | <VersionInfo Name="CodePage">1250</VersionInfo> 109 | </VersionInfo> 110 | <VersionInfoKeys> 111 | <VersionInfoKeys Name="CompanyName"/> 112 | <VersionInfoKeys Name="FileDescription"/> 113 | <VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys> 114 | <VersionInfoKeys Name="InternalName"/> 115 | <VersionInfoKeys Name="LegalCopyright"/> 116 | <VersionInfoKeys Name="LegalTrademarks"/> 117 | <VersionInfoKeys Name="OriginalFilename"/> 118 | <VersionInfoKeys Name="ProductName"/> 119 | <VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys> 120 | <VersionInfoKeys Name="Comments"/> 121 | </VersionInfoKeys> 122 | </Delphi.Personality> 123 | <Platforms> 124 | <Platform value="Win32">True</Platform> 125 | </Platforms> 126 | </BorlandProject> 127 | <ProjectFileVersion>12</ProjectFileVersion> 128 | </ProjectExtensions> 129 | </Project> 130 | -------------------------------------------------------------------------------- /demos/khexeditor/HexEditor.otares: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/demos/khexeditor/HexEditor.otares -------------------------------------------------------------------------------- /demos/khexeditor/HexEditor.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/demos/khexeditor/HexEditor.res -------------------------------------------------------------------------------- /demos/khexeditor/HexEditor_Icon.ico: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/demos/khexeditor/HexEditor_Icon.ico -------------------------------------------------------------------------------- /demos/khexeditor/HexEditor_Icon1.ico: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/demos/khexeditor/HexEditor_Icon1.ico -------------------------------------------------------------------------------- /demos/khexeditor/HexEditor_Icon2.ico: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/demos/khexeditor/HexEditor_Icon2.ico -------------------------------------------------------------------------------- /demos/khexeditor/XPman.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/demos/khexeditor/XPman.res -------------------------------------------------------------------------------- /demos/khexeditor/about.dfm: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/demos/khexeditor/about.dfm -------------------------------------------------------------------------------- /demos/khexeditor/about.lfm: -------------------------------------------------------------------------------- 1 | object AboutForm: TAboutForm 2 | Left = 1395 3 | Height = 120 4 | Top = 985 5 | Width = 292 6 | BorderStyle = bsDialog 7 | Caption = 'About' 8 | ClientHeight = 120 9 | ClientWidth = 292 10 | Font.Height = -11 11 | Font.Name = 'Tahoma' 12 | Position = poScreenCenter 13 | LCLVersion = '1.4.2.0' 14 | object LBProductName: TLabel 15 | Left = 8 16 | Height = 19 17 | Top = 8 18 | Width = 139 19 | Caption = 'Hex Editor (Demo)' 20 | Font.Height = -16 21 | Font.Name = 'Arial' 22 | Font.Style = [fsBold] 23 | ParentColor = False 24 | ParentFont = False 25 | end 26 | object LBCopyright: TLabel 27 | Left = 8 28 | Height = 13 29 | Top = 32 30 | Width = 152 31 | Caption = 'Copyright (C) 2006 Tomas Krysl' 32 | ParentColor = False 33 | end 34 | object LBEmail: TLabel 35 | Left = 8 36 | Height = 13 37 | Top = 53 38 | Width = 105 39 | Caption = 'http://www.tkweb.eu' 40 | ParentColor = False 41 | end 42 | object BUOk: TButton 43 | Left = 111 44 | Height = 25 45 | Top = 84 46 | Width = 75 47 | Caption = 'OK' 48 | Default = True 49 | ModalResult = 1 50 | TabOrder = 0 51 | end 52 | end 53 | -------------------------------------------------------------------------------- /demos/khexeditor/about.pas: -------------------------------------------------------------------------------- 1 | unit About; 2 | 3 | {$include kcontrols.inc} 4 | 5 | interface 6 | 7 | uses 8 | {$IFDEF FPC} 9 | LCLType, LCLIntf, LResources, 10 | {$ELSE} 11 | Windows, Messages, 12 | {$ENDIF} 13 | SysUtils, Classes, Graphics, Forms, Controls, StdCtrls, 14 | Buttons, ExtCtrls; 15 | 16 | type 17 | TAboutForm = class(TForm) 18 | BUOk: TButton; 19 | LBProductName: TLabel; 20 | LBCopyright: TLabel; 21 | LBEmail: TLabel; 22 | private 23 | { Private declarations } 24 | public 25 | { Public declarations } 26 | end; 27 | 28 | var 29 | AboutForm: TAboutForm; 30 | 31 | implementation 32 | 33 | {$IFDEF FPC} 34 | {$R *.lfm} 35 | {$ELSE} 36 | {$R *.dfm} 37 | {$ENDIF} 38 | 39 | end. 40 | 41 | -------------------------------------------------------------------------------- /demos/khexeditor/hexeditor.ini: -------------------------------------------------------------------------------- 1 | [Settings] 2 | Version=103 3 | Environment=670101000101010000010101000000080000000000000002000000000000008200000010000000E80300000D00000001 4 | Address prefix=0x 5 | Font name=Courier New 6 | Last file name=C:\VisualMASM\Projects\HelloWorld\Release\HelloWorld.obj 7 | Window state=0 8 | Left=705 9 | Top=40 10 | Right=1855 11 | Bottom=1319 12 | -------------------------------------------------------------------------------- /demos/khexeditor/hexeditorlaz.lpr: -------------------------------------------------------------------------------- 1 | program hexeditorlaz; 2 | 3 | uses 4 | Interfaces, 5 | Forms, Printer4Lazarus, 6 | Res in 'Res.pas', 7 | Basic in 'Basic.pas', 8 | About in 'About.pas' {AboutForm}, 9 | Search in 'Search.pas' {SearchForm}, 10 | Replace in 'Replace.pas' {ReplaceForm}, 11 | Options in 'Options.pas' {OptionsForm}, 12 | ReplacePrompt in 'ReplacePrompt.pas' {ReplacePromptForm}, 13 | Main in 'Main.pas' {MainForm}, 14 | PrintStatus in 'PrintStatus.pas'; 15 | 16 | {$R *.res} 17 | 18 | begin 19 | Application.Initialize; 20 | Application.CreateForm(TMainForm, MainForm); 21 | Application.CreateForm(TSearchForm, SearchForm); 22 | Application.CreateForm(TReplaceForm, ReplaceForm); 23 | Application.CreateForm(TAboutForm, AboutForm); 24 | Application.CreateForm(TOptionsForm, OptionsForm); 25 | Application.CreateForm(TReplacePromptForm, ReplacePromptForm); 26 | Application.CreateForm(TPrintStatusForm, PrintStatusForm); 27 | Application.Run; 28 | end. 29 | -------------------------------------------------------------------------------- /demos/khexeditor/hexeditorlaz.manifest: -------------------------------------------------------------------------------- 1 | <?xml version="1.0" encoding="UTF-8" standalone="yes"?> 2 | <assembly xmlns="urn:schemas-microsoft-com:asm.v1" manifestVersion="1.0"> 3 | <assemblyIdentity version="1.0.0.0" processorArchitecture="*" name="CompanyName.ProductName.YourApp" type="win32"/> 4 | <description>Your application description here.</description> 5 | <dependency> 6 | <dependentAssembly> 7 | <assemblyIdentity type="win32" name="Microsoft.Windows.Common-Controls" version="6.0.0.0" processorArchitecture="*" publicKeyToken="6595b64144ccf1df" language="*"/> 8 | </dependentAssembly> 9 | </dependency> 10 | <trustInfo xmlns="urn:schemas-microsoft-com:asm.v3"> 11 | <security> 12 | <requestedPrivileges> 13 | <requestedExecutionLevel level="asInvoker" uiAccess="false"/> 14 | </requestedPrivileges> 15 | </security> 16 | </trustInfo> 17 | </assembly> -------------------------------------------------------------------------------- /demos/khexeditor/hexeditorlaz.rc: -------------------------------------------------------------------------------- 1 | #define RT_MANIFEST 24 2 | #define CREATEPROCESS_MANIFEST_RESOURCE_ID 1 3 | #define ISOLATIONAWARE_MANIFEST_RESOURCE_ID 2 4 | #define ISOLATIONAWARE_NOSTATICIMPORT_MANIFEST_RESOURCE_ID 3 5 | 6 | CREATEPROCESS_MANIFEST_RESOURCE_ID RT_MANIFEST "hexeditorlaz.manifest" 7 | -------------------------------------------------------------------------------- /demos/khexeditor/kgriddemolaz.rc: -------------------------------------------------------------------------------- 1 | #define RT_MANIFEST 24 2 | #define CREATEPROCESS_MANIFEST_RESOURCE_ID 1 3 | #define ISOLATIONAWARE_MANIFEST_RESOURCE_ID 2 4 | #define ISOLATIONAWARE_NOSTATICIMPORT_MANIFEST_RESOURCE_ID 3 5 | 6 | CREATEPROCESS_MANIFEST_RESOURCE_ID RT_MANIFEST "kgriddemolaz.manifest" 7 | -------------------------------------------------------------------------------- /demos/khexeditor/printstatus.dfm: -------------------------------------------------------------------------------- 1 | object PrintStatusForm: TPrintStatusForm 2 | Left = 433 3 | Top = 373 4 | BorderIcons = [] 5 | BorderStyle = bsDialog 6 | Caption = 'Print status' 7 | ClientHeight = 80 8 | ClientWidth = 248 9 | Color = clBtnFace 10 | Font.Charset = DEFAULT_CHARSET 11 | Font.Color = clWindowText 12 | Font.Height = -11 13 | Font.Name = 'Tahoma' 14 | Font.Style = [] 15 | FormStyle = fsStayOnTop 16 | OldCreateOrder = False 17 | Position = poScreenCenter 18 | PixelsPerInch = 96 19 | TextHeight = 13 20 | object LBPage: TLabel 21 | Left = 8 22 | Top = 16 23 | Width = 35 24 | Height = 13 25 | Caption = 'LBPage' 26 | end 27 | object BUAbort: TButton 28 | Left = 88 29 | Top = 48 30 | Width = 75 31 | Height = 25 32 | Caption = '&Abort' 33 | TabOrder = 0 34 | OnClick = BUAbortClick 35 | end 36 | end 37 | -------------------------------------------------------------------------------- /demos/khexeditor/printstatus.lfm: -------------------------------------------------------------------------------- 1 | object PrintStatusForm: TPrintStatusForm 2 | Left = 1299 3 | Height = 80 4 | Top = 933 5 | Width = 248 6 | BorderIcons = [] 7 | BorderStyle = bsDialog 8 | Caption = 'Print status' 9 | ClientHeight = 80 10 | ClientWidth = 248 11 | Font.Height = -11 12 | Font.Name = 'Tahoma' 13 | FormStyle = fsStayOnTop 14 | Position = poScreenCenter 15 | LCLVersion = '1.4.2.0' 16 | object LBPage: TLabel 17 | Left = 8 18 | Height = 13 19 | Top = 16 20 | Width = 35 21 | Caption = 'LBPage' 22 | ParentColor = False 23 | end 24 | object BUAbort: TButton 25 | Left = 88 26 | Height = 25 27 | Top = 48 28 | Width = 75 29 | Caption = '&Abort' 30 | OnClick = BUAbortClick 31 | TabOrder = 0 32 | end 33 | end 34 | -------------------------------------------------------------------------------- /demos/khexeditor/printstatus.pas: -------------------------------------------------------------------------------- 1 | unit PrintStatus; 2 | 3 | {$include kcontrols.inc} 4 | 5 | interface 6 | 7 | uses 8 | {$IFDEF FPC} 9 | LCLType, LCLIntf, LResources, 10 | {$ELSE} 11 | Windows, Messages, 12 | {$ENDIF} 13 | SysUtils, Variants, Classes, Graphics, Controls, Forms, 14 | Dialogs, StdCtrls; 15 | 16 | type 17 | TPrintStatusForm = class(TForm) 18 | BUAbort: TButton; 19 | LBPage: TLabel; 20 | procedure BUAbortClick(Sender: TObject); 21 | private 22 | { Private declarations } 23 | public 24 | { Public declarations } 25 | Aborted: Boolean; 26 | end; 27 | 28 | var 29 | PrintStatusForm: TPrintStatusForm; 30 | 31 | implementation 32 | 33 | {$IFDEF FPC} 34 | {$R *.lfm} 35 | {$ELSE} 36 | {$R *.dfm} 37 | {$ENDIF} 38 | 39 | procedure TPrintStatusForm.BUAbortClick(Sender: TObject); 40 | begin 41 | Aborted := True; 42 | end; 43 | 44 | end. 45 | -------------------------------------------------------------------------------- /demos/khexeditor/replace.dfm: -------------------------------------------------------------------------------- 1 | inherited ReplaceForm: TReplaceForm 2 | Left = 608 3 | Top = 244 4 | Caption = 'Replace Text' 5 | ClientHeight = 267 6 | OldCreateOrder = True 7 | PixelsPerInch = 96 8 | TextHeight = 13 9 | object LBReplaceText: TLabel [1] 10 | Left = 8 11 | Top = 44 12 | Width = 65 13 | Height = 13 14 | Caption = 'Rep&lace with:' 15 | FocusControl = CBTextToReplace 16 | end 17 | inherited CBTextToFind: TComboBox 18 | Left = 80 19 | Width = 241 20 | end 21 | inherited GBOptions: TGroupBox 22 | Top = 72 23 | Height = 85 24 | TabOrder = 2 25 | object CBPromptOnReplace: TCheckBox 26 | Left = 8 27 | Top = 56 28 | Width = 153 29 | Height = 17 30 | Caption = '&Prompt on replace' 31 | Checked = True 32 | State = cbChecked 33 | TabOrder = 2 34 | end 35 | end 36 | inherited BUFind: TButton 37 | Left = 60 38 | Top = 236 39 | Caption = '&Replace' 40 | TabOrder = 6 41 | OnClick = CBTextToReplaceClick 42 | end 43 | inherited BUCancel: TButton 44 | Left = 244 45 | Top = 236 46 | TabOrder = 8 47 | end 48 | inherited GBDirection: TGroupBox 49 | Top = 72 50 | Height = 65 51 | TabOrder = 3 52 | end 53 | inherited GBScope: TGroupBox 54 | Top = 164 55 | TabOrder = 4 56 | end 57 | inherited GBOrigin: TGroupBox 58 | Top = 164 59 | TabOrder = 5 60 | end 61 | object CBTextToReplace: TComboBox 62 | Left = 80 63 | Top = 40 64 | Width = 241 65 | Height = 21 66 | ItemHeight = 13 67 | TabOrder = 1 68 | OnSelect = CBTextToReplaceClick 69 | end 70 | object BUReplaceAll: TButton 71 | Left = 144 72 | Top = 236 73 | Width = 89 74 | Height = 25 75 | Caption = 'Replace &All' 76 | ModalResult = 10 77 | TabOrder = 7 78 | end 79 | end 80 | -------------------------------------------------------------------------------- /demos/khexeditor/replace.lfm: -------------------------------------------------------------------------------- 1 | inherited ReplaceForm: TReplaceForm 2 | Left = 1582 3 | Height = 269 4 | Top = 808 5 | Caption = 'Replace Text' 6 | ClientHeight = 269 7 | OnShow = FormShow 8 | inherited CBTextToFind: TComboBox 9 | Left = 80 10 | Width = 241 11 | OnChange = CBTextToFindChange 12 | end 13 | inherited GBOptions: TGroupBox 14 | Height = 85 15 | Top = 72 16 | ClientHeight = 67 17 | TabOrder = 2 18 | object CBPromptOnReplace: TCheckBox[2] 19 | Left = 8 20 | Height = 19 21 | Top = 44 22 | Width = 107 23 | Caption = '&Prompt on replace' 24 | Checked = True 25 | State = cbChecked 26 | TabOrder = 2 27 | end 28 | end 29 | inherited BUFind: TButton 30 | Left = 60 31 | Top = 236 32 | Caption = '&Replace' 33 | OnClick = CBTextToReplaceClick 34 | TabOrder = 6 35 | end 36 | inherited BUCancel: TButton 37 | Left = 244 38 | Top = 236 39 | TabOrder = 8 40 | end 41 | inherited GBDirection: TGroupBox 42 | Height = 65 43 | Top = 72 44 | ClientHeight = 47 45 | TabOrder = 3 46 | end 47 | inherited GBScope: TGroupBox 48 | Top = 164 49 | TabOrder = 4 50 | end 51 | inherited GBOrigin: TGroupBox 52 | Top = 164 53 | TabOrder = 5 54 | end 55 | object LBReplaceText: TLabel[8] 56 | Left = 8 57 | Height = 13 58 | Top = 44 59 | Width = 65 60 | Caption = 'Rep&lace with:' 61 | FocusControl = CBTextToReplace 62 | ParentColor = False 63 | end 64 | object CBTextToReplace: TComboBox[9] 65 | Left = 80 66 | Height = 21 67 | Top = 40 68 | Width = 241 69 | ItemHeight = 13 70 | OnSelect = CBTextToReplaceClick 71 | TabOrder = 1 72 | end 73 | object BUReplaceAll: TButton[10] 74 | Left = 144 75 | Height = 25 76 | Top = 236 77 | Width = 89 78 | Caption = 'Replace &All' 79 | ModalResult = 10 80 | TabOrder = 7 81 | end 82 | end 83 | -------------------------------------------------------------------------------- /demos/khexeditor/replace.pas: -------------------------------------------------------------------------------- 1 | unit Replace; 2 | 3 | {$include kcontrols.inc} 4 | 5 | interface 6 | 7 | uses 8 | {$IFDEF FPC} 9 | LCLType, LCLIntf, LResources, 10 | {$ELSE} 11 | Windows, Messages, 12 | {$ENDIF} 13 | SysUtils, Classes, Graphics, Controls, Forms, Dialogs, 14 | StdCtrls, KEditCommon, Search; 15 | 16 | type 17 | 18 | { TReplaceForm } 19 | 20 | TReplaceForm = class(TSearchForm) 21 | LBReplaceText: TLabel; 22 | CBTextToReplace: TComboBox; 23 | BUReplaceAll: TButton; 24 | CBPromptOnReplace: TCheckBox; 25 | procedure FormShow(Sender: TObject); 26 | procedure CBTextToReplaceClick(Sender: TObject); 27 | procedure CBTextToFindChange(Sender: TObject); 28 | private 29 | { Private declarations } 30 | public 31 | { Public declarations } 32 | procedure GetData(var Data: TKEditSearchData); override; 33 | procedure SetData(const Data: TKEditSearchData; SelAvail: Boolean); override; 34 | end; 35 | 36 | var 37 | ReplaceForm: TReplaceForm; 38 | 39 | implementation 40 | 41 | {$IFDEF FPC} 42 | {$R *.lfm} 43 | {$ELSE} 44 | {$R *.dfm} 45 | {$ENDIF} 46 | 47 | procedure TReplaceForm.FormShow(Sender: TObject); 48 | begin 49 | CBTextToFindChange(Sender); 50 | end; 51 | 52 | procedure TReplaceForm.CBTextToFindChange(Sender: TObject); 53 | begin 54 | BUFind.Enabled := (CBTextToFind.Text <> ''); 55 | BUReplaceAll.Enabled := BUFind.Enabled; 56 | end; 57 | 58 | procedure TReplaceForm.CBTextToReplaceClick(Sender: TObject); 59 | begin 60 | if (CBTextToReplace.Text <> '') and 61 | (CBTextToReplace.Items.IndexOf(CBTextToReplace.Text) < 0) then 62 | CBTextToReplace.Items.Insert(0, CBTextToReplace.Text); 63 | end; 64 | 65 | procedure TReplaceForm.GetData(var Data: TKEditSearchData); 66 | begin 67 | inherited; 68 | with Data do 69 | begin 70 | if CBPromptOnReplace.Checked then Include(Options, esoPrompt); 71 | TextToReplace := CBTextToReplace.Text; 72 | end; 73 | end; 74 | 75 | procedure TReplaceForm.SetData(const Data: TKEditSearchData; SelAvail: Boolean); 76 | begin 77 | inherited; 78 | with Data do 79 | CBPromptOnReplace.Checked := esoPrompt in Options; 80 | end; 81 | 82 | end. 83 | -------------------------------------------------------------------------------- /demos/khexeditor/replaceprompt.dfm: -------------------------------------------------------------------------------- 1 | object ReplacePromptForm: TReplacePromptForm 2 | Left = 510 3 | Top = 422 4 | BorderStyle = bsDialog 5 | Caption = 'Confirm' 6 | ClientHeight = 90 7 | ClientWidth = 365 8 | Color = clBtnFace 9 | Font.Charset = DEFAULT_CHARSET 10 | Font.Color = clWindowText 11 | Font.Height = -11 12 | Font.Name = 'Tahoma' 13 | Font.Style = [] 14 | OldCreateOrder = False 15 | Position = poScreenCenter 16 | PixelsPerInch = 96 17 | TextHeight = 13 18 | object LBText: TLabel 19 | Left = 16 20 | Top = 16 21 | Width = 7 22 | Height = 13 23 | Caption = 'A' 24 | end 25 | object BUYes: TButton 26 | Left = 16 27 | Top = 48 28 | Width = 75 29 | Height = 25 30 | Caption = 'Yes' 31 | ModalResult = 6 32 | TabOrder = 0 33 | end 34 | object BuNo: TButton 35 | Left = 104 36 | Top = 48 37 | Width = 75 38 | Height = 25 39 | Caption = 'No' 40 | ModalResult = 7 41 | TabOrder = 1 42 | end 43 | object BUAll: TButton 44 | Left = 192 45 | Top = 48 46 | Width = 75 47 | Height = 25 48 | Caption = 'All' 49 | ModalResult = 10 50 | TabOrder = 2 51 | end 52 | object BUCancel: TButton 53 | Left = 280 54 | Top = 48 55 | Width = 75 56 | Height = 25 57 | Caption = 'Cancel' 58 | ModalResult = 2 59 | TabOrder = 3 60 | end 61 | end 62 | -------------------------------------------------------------------------------- /demos/khexeditor/replaceprompt.lfm: -------------------------------------------------------------------------------- 1 | object ReplacePromptForm: TReplacePromptForm 2 | Left = 1530 3 | Height = 90 4 | Top = 1046 5 | Width = 365 6 | BorderStyle = bsDialog 7 | Caption = 'Confirm' 8 | ClientHeight = 90 9 | ClientWidth = 365 10 | Font.Height = -11 11 | Font.Name = 'Tahoma' 12 | Position = poScreenCenter 13 | LCLVersion = '1.4.2.0' 14 | object LBText: TLabel 15 | Left = 16 16 | Height = 13 17 | Top = 16 18 | Width = 7 19 | Caption = 'A' 20 | ParentColor = False 21 | end 22 | object BUYes: TButton 23 | Left = 16 24 | Height = 25 25 | Top = 48 26 | Width = 75 27 | Caption = 'Yes' 28 | ModalResult = 6 29 | TabOrder = 0 30 | end 31 | object BuNo: TButton 32 | Left = 104 33 | Height = 25 34 | Top = 48 35 | Width = 75 36 | Caption = 'No' 37 | ModalResult = 7 38 | TabOrder = 1 39 | end 40 | object BUAll: TButton 41 | Left = 192 42 | Height = 25 43 | Top = 48 44 | Width = 75 45 | Caption = 'All' 46 | ModalResult = 10 47 | TabOrder = 2 48 | end 49 | object BUCancel: TButton 50 | Left = 280 51 | Height = 25 52 | Top = 48 53 | Width = 75 54 | Caption = 'Cancel' 55 | ModalResult = 2 56 | TabOrder = 3 57 | end 58 | end 59 | -------------------------------------------------------------------------------- /demos/khexeditor/replaceprompt.pas: -------------------------------------------------------------------------------- 1 | unit ReplacePrompt; 2 | 3 | {$include kcontrols.inc} 4 | 5 | interface 6 | 7 | uses 8 | {$IFDEF FPC} 9 | LCLType, LCLIntf, LResources, 10 | {$ELSE} 11 | Windows, Messages, 12 | {$ENDIF} 13 | SysUtils, Variants, Classes, Graphics, Controls, Forms, 14 | Dialogs, StdCtrls; 15 | 16 | type 17 | TReplacePromptForm = class(TForm) 18 | LBText: TLabel; 19 | BUYes: TButton; 20 | BuNo: TButton; 21 | BUAll: TButton; 22 | BUCancel: TButton; 23 | private 24 | { Private declarations } 25 | public 26 | { Public declarations } 27 | end; 28 | 29 | var 30 | ReplacePromptForm: TReplacePromptForm; 31 | 32 | implementation 33 | 34 | {$IFDEF FPC} 35 | {$R *.lfm} 36 | {$ELSE} 37 | {$R *.dfm} 38 | {$ENDIF} 39 | 40 | end. 41 | -------------------------------------------------------------------------------- /demos/khexeditor/res.pas: -------------------------------------------------------------------------------- 1 | unit Res; 2 | 3 | interface 4 | 5 | resourcestring 6 | {main} 7 | sAppName = 'Hex Editor'; 8 | sNeedSaveQuestion = 'File "%s" has been changed. Do you want to save it?'; 9 | sStatusDigit = 'Digit: %d'; 10 | sStatusPosDec = 'Pos: %d'; 11 | sStatusPosHex = 'Pos: %x'; 12 | sModified = 'Modified'; 13 | sOverwrite = 'Overwrite'; 14 | sInsert = 'Insert'; 15 | sNoname = 'new file'; 16 | sReplaceQuestion = 'Replace this occurence of "%s"?'; 17 | sReplace = '&Replace'; 18 | sReplaceAll = 'Replace &all'; 19 | sReplaceSkip = '&Skip'; 20 | sPrintedPageAndCopy = 'Printing page %d from %d. Actual copy: %d from %d.'; 21 | 22 | {printsetup} 23 | sPSAllPages = 'All pages (%d)'; 24 | 25 | {errors} 26 | sErrOpenError = 'Can''t open file "%s".'; 27 | sErrSaveError = 'Can''t save file "%s".'; 28 | sErrTextNotFound = 'The text "%s" was not found.'; 29 | sErrNoDigitsInText = 'The text "%s" can''t be interpreted as hexadecimal digits.'; 30 | sErrIntegerValue = 'Bad integer value.'; 31 | sErrIntegerValueOutOfRange = 'Integer value out of range %d to %d.'; 32 | sErrNoPrinterInstalled = 'No printer is installed on this computer.'; 33 | 34 | implementation 35 | 36 | end. 37 | -------------------------------------------------------------------------------- /demos/khexeditor/search.dfm: -------------------------------------------------------------------------------- 1 | object SearchForm: TSearchForm 2 | Left = 335 3 | Top = 330 4 | BorderStyle = bsDialog 5 | Caption = 'Find Text' 6 | ClientHeight = 204 7 | ClientWidth = 330 8 | Color = clBtnFace 9 | Font.Charset = DEFAULT_CHARSET 10 | Font.Color = clWindowText 11 | Font.Height = -11 12 | Font.Name = 'Tahoma' 13 | Font.Style = [] 14 | OldCreateOrder = False 15 | Position = poScreenCenter 16 | OnShow = FormShow 17 | PixelsPerInch = 96 18 | TextHeight = 13 19 | object LBFindText: TLabel 20 | Left = 8 21 | Top = 12 22 | Width = 60 23 | Height = 13 24 | Caption = '&Text to find:' 25 | FocusControl = CBTextToFind 26 | end 27 | object CBTextToFind: TComboBox 28 | Left = 72 29 | Top = 8 30 | Width = 249 31 | Height = 21 32 | ItemHeight = 13 33 | TabOrder = 0 34 | OnChange = CBTextToFindChange 35 | end 36 | object GBOptions: TGroupBox 37 | Left = 8 38 | Top = 36 39 | Width = 173 40 | Height = 61 41 | Caption = 'Options' 42 | TabOrder = 1 43 | object CBMatchCase: TCheckBox 44 | Left = 8 45 | Top = 16 46 | Width = 153 47 | Height = 17 48 | Caption = '&Case sensitive' 49 | TabOrder = 0 50 | end 51 | object CBHexaSearch: TCheckBox 52 | Left = 8 53 | Top = 36 54 | Width = 157 55 | Height = 17 56 | Caption = 'As he&xadecimal digits' 57 | TabOrder = 1 58 | end 59 | end 60 | object BUFind: TButton 61 | Left = 164 62 | Top = 172 63 | Width = 75 64 | Height = 25 65 | Caption = '&Find' 66 | Default = True 67 | ModalResult = 6 68 | TabOrder = 2 69 | OnClick = BUFindClick 70 | end 71 | object BUCancel: TButton 72 | Left = 248 73 | Top = 172 74 | Width = 75 75 | Height = 25 76 | Cancel = True 77 | Caption = 'Cancel' 78 | ModalResult = 2 79 | TabOrder = 3 80 | end 81 | object GBDirection: TGroupBox 82 | Left = 192 83 | Top = 36 84 | Width = 129 85 | Height = 61 86 | Caption = 'Direction' 87 | TabOrder = 4 88 | object RBForward: TRadioButton 89 | Left = 8 90 | Top = 16 91 | Width = 105 92 | Height = 17 93 | Caption = 'Forwar&d' 94 | Checked = True 95 | TabOrder = 0 96 | TabStop = True 97 | end 98 | object RBBackward: TRadioButton 99 | Left = 8 100 | Top = 36 101 | Width = 105 102 | Height = 17 103 | Caption = '&Backward' 104 | TabOrder = 1 105 | end 106 | end 107 | object GBScope: TGroupBox 108 | Left = 8 109 | Top = 104 110 | Width = 173 111 | Height = 61 112 | Caption = 'Scope' 113 | TabOrder = 5 114 | object RBGlobal: TRadioButton 115 | Left = 8 116 | Top = 16 117 | Width = 157 118 | Height = 17 119 | Caption = '&Global' 120 | Checked = True 121 | TabOrder = 0 122 | TabStop = True 123 | end 124 | object RBSelectedOnly: TRadioButton 125 | Left = 8 126 | Top = 36 127 | Width = 153 128 | Height = 17 129 | Caption = '&Selected only' 130 | TabOrder = 1 131 | end 132 | end 133 | object GBOrigin: TGroupBox 134 | Left = 192 135 | Top = 104 136 | Width = 129 137 | Height = 61 138 | Caption = 'Origin' 139 | TabOrder = 6 140 | object RBFromCursor: TRadioButton 141 | Left = 8 142 | Top = 16 143 | Width = 113 144 | Height = 17 145 | Caption = 'Fro&m cursor' 146 | Checked = True 147 | TabOrder = 0 148 | TabStop = True 149 | end 150 | object RBEntireScope: TRadioButton 151 | Left = 8 152 | Top = 36 153 | Width = 113 154 | Height = 17 155 | Caption = '&Entire scope' 156 | TabOrder = 1 157 | end 158 | end 159 | end 160 | -------------------------------------------------------------------------------- /demos/khexeditor/search.lfm: -------------------------------------------------------------------------------- 1 | object SearchForm: TSearchForm 2 | Left = 1005 3 | Height = 204 4 | Top = 825 5 | Width = 330 6 | BorderStyle = bsDialog 7 | Caption = 'Find Text' 8 | ClientHeight = 204 9 | ClientWidth = 330 10 | Font.Height = -11 11 | Font.Name = 'Tahoma' 12 | OnShow = FormShow 13 | Position = poScreenCenter 14 | LCLVersion = '1.4.2.0' 15 | object LBFindText: TLabel 16 | Left = 8 17 | Height = 13 18 | Top = 12 19 | Width = 60 20 | Caption = '&Text to find:' 21 | FocusControl = CBTextToFind 22 | ParentColor = False 23 | end 24 | object CBTextToFind: TComboBox 25 | Left = 72 26 | Height = 21 27 | Top = 8 28 | Width = 249 29 | ItemHeight = 13 30 | OnChange = CBTextToFindChange 31 | TabOrder = 0 32 | end 33 | object GBOptions: TGroupBox 34 | Left = 8 35 | Height = 61 36 | Top = 36 37 | Width = 173 38 | Caption = 'Options' 39 | ClientHeight = 43 40 | ClientWidth = 169 41 | TabOrder = 1 42 | object CBMatchCase: TCheckBox 43 | Left = 8 44 | Height = 19 45 | Top = 4 46 | Width = 89 47 | Caption = '&Case sensitive' 48 | TabOrder = 0 49 | end 50 | object CBHexaSearch: TCheckBox 51 | Left = 8 52 | Height = 19 53 | Top = 24 54 | Width = 122 55 | Caption = 'As he&xadecimal digits' 56 | TabOrder = 1 57 | end 58 | end 59 | object BUFind: TButton 60 | Left = 164 61 | Height = 25 62 | Top = 172 63 | Width = 75 64 | Caption = '&Find' 65 | Default = True 66 | ModalResult = 6 67 | OnClick = BUFindClick 68 | TabOrder = 2 69 | end 70 | object BUCancel: TButton 71 | Left = 248 72 | Height = 25 73 | Top = 172 74 | Width = 75 75 | Cancel = True 76 | Caption = 'Cancel' 77 | ModalResult = 2 78 | TabOrder = 3 79 | end 80 | object GBDirection: TGroupBox 81 | Left = 192 82 | Height = 61 83 | Top = 36 84 | Width = 129 85 | Caption = 'Direction' 86 | ClientHeight = 43 87 | ClientWidth = 125 88 | TabOrder = 4 89 | object RBForward: TRadioButton 90 | Left = 8 91 | Height = 19 92 | Top = 4 93 | Width = 60 94 | Caption = 'Forwar&d' 95 | Checked = True 96 | TabOrder = 0 97 | TabStop = True 98 | end 99 | object RBBackward: TRadioButton 100 | Left = 8 101 | Height = 19 102 | Top = 24 103 | Width = 66 104 | Caption = '&Backward' 105 | TabOrder = 1 106 | end 107 | end 108 | object GBScope: TGroupBox 109 | Left = 8 110 | Height = 61 111 | Top = 104 112 | Width = 173 113 | Caption = 'Scope' 114 | ClientHeight = 43 115 | ClientWidth = 169 116 | TabOrder = 5 117 | object RBGlobal: TRadioButton 118 | Left = 8 119 | Height = 19 120 | Top = 4 121 | Width = 49 122 | Caption = '&Global' 123 | Checked = True 124 | TabOrder = 0 125 | TabStop = True 126 | end 127 | object RBSelectedOnly: TRadioButton 128 | Left = 8 129 | Height = 19 130 | Top = 24 131 | Width = 84 132 | Caption = '&Selected only' 133 | TabOrder = 1 134 | end 135 | end 136 | object GBOrigin: TGroupBox 137 | Left = 192 138 | Height = 61 139 | Top = 104 140 | Width = 129 141 | Caption = 'Origin' 142 | ClientHeight = 43 143 | ClientWidth = 125 144 | TabOrder = 6 145 | object RBFromCursor: TRadioButton 146 | Left = 8 147 | Height = 19 148 | Top = 4 149 | Width = 77 150 | Caption = 'Fro&m cursor' 151 | Checked = True 152 | TabOrder = 0 153 | TabStop = True 154 | end 155 | object RBEntireScope: TRadioButton 156 | Left = 8 157 | Height = 19 158 | Top = 24 159 | Width = 79 160 | Caption = '&Entire scope' 161 | TabOrder = 1 162 | end 163 | end 164 | end 165 | -------------------------------------------------------------------------------- /demos/khexeditor/search.pas: -------------------------------------------------------------------------------- 1 | unit Search; 2 | 3 | {$include kcontrols.inc} 4 | 5 | interface 6 | 7 | uses 8 | {$IFDEF FPC} 9 | LCLType, LCLIntf, LResources, 10 | {$ELSE} 11 | Windows, Messages, 12 | {$ENDIF} 13 | SysUtils, Classes, Graphics, Controls, Forms, Dialogs, 14 | StdCtrls, KEditCommon; 15 | 16 | type 17 | TSearchForm = class(TForm) 18 | CBTextToFind: TComboBox; 19 | GBOptions: TGroupBox; 20 | LBFindText: TLabel; 21 | BUFind: TButton; 22 | BUCancel: TButton; 23 | CBMatchCase: TCheckBox; 24 | CBHexaSearch: TCheckBox; 25 | GBDirection: TGroupBox; 26 | RBForward: TRadioButton; 27 | RBBackward: TRadioButton; 28 | GBScope: TGroupBox; 29 | RBGlobal: TRadioButton; 30 | RBSelectedOnly: TRadioButton; 31 | GBOrigin: TGroupBox; 32 | RBFromCursor: TRadioButton; 33 | RBEntireScope: TRadioButton; 34 | procedure BUFindClick(Sender: TObject); 35 | procedure CBTextToFindChange(Sender: TObject); 36 | procedure FormShow(Sender: TObject); 37 | private 38 | { Private declarations } 39 | public 40 | { Public declarations } 41 | procedure GetData(var Data: TKEditSearchData); virtual; 42 | procedure SetData(const Data: TKEditSearchData; SelAvail: Boolean); virtual; 43 | end; 44 | 45 | var 46 | SearchForm: TSearchForm; 47 | 48 | function TrimToSize(const Text: string; Size: Integer): string; 49 | 50 | implementation 51 | 52 | {$IFDEF FPC} 53 | {$R *.lfm} 54 | {$ELSE} 55 | {$R *.dfm} 56 | {$ENDIF} 57 | 58 | uses Options; 59 | 60 | function TrimToSize(const Text: string; Size: Integer): string; 61 | begin 62 | Result := Text; 63 | if (Size > 0) and (Length(Result) > Size) then 64 | begin 65 | SetLength(Result, Size); 66 | Result := Format('%s...', [Result]); 67 | end; 68 | end; 69 | 70 | procedure TSearchForm.BUFindClick(Sender: TObject); 71 | begin 72 | if CBTextToFind.Items.IndexOf(CBTextToFind.Text) < 0 then 73 | CBTextToFind.Items.Insert(0, CBTextToFind.Text); 74 | end; 75 | 76 | procedure TSearchForm.CBTextToFindChange(Sender: TObject); 77 | begin 78 | BUFind.Enabled := CBTextToFind.Text <> ''; 79 | end; 80 | 81 | procedure TSearchForm.FormShow(Sender: TObject); 82 | begin 83 | CBTextToFindChange(Sender); 84 | end; 85 | 86 | procedure TSearchForm.GetData(var Data: TKEditSearchData); 87 | begin 88 | with Data do 89 | begin 90 | Options := []; 91 | if CBMatchCase.Checked then Include(Options, esoMatchCase); 92 | if CBHexaSearch.Checked then Include(Options, esoTreatAsDigits); 93 | if RBBackward.Checked then Include(Options, esoBackwards); 94 | if RBEntireScope.Checked then Include(Options, esoEntireScope); 95 | if RBSelectedOnly.Checked then Include(Options, esoSelectedOnly); 96 | TextToFind := CBTextToFind.Text; 97 | end; 98 | end; 99 | 100 | procedure TSearchForm.SetData(const Data: TKEditSearchData; SelAvail: Boolean); 101 | begin 102 | ActiveControl := CBTextToFind; 103 | with Data do 104 | begin 105 | CBMatchCase.Checked := esoMatchCase in Options; 106 | CBHexaSearch.Checked := esoTreatAsDigits in Options; 107 | if esoBackwards in Options then 108 | RBBackward.Checked := True 109 | else 110 | RBForward.Checked := True; 111 | if esoEntireScope in Options then 112 | RBEntireScope.Checked := True 113 | else 114 | RBFromCursor.Checked := True; 115 | if SelAvail then 116 | begin 117 | RBSelectedOnly.Enabled := True; 118 | if esoSelectedOnly in Options then 119 | RBSelectedOnly.Checked := True 120 | else 121 | RBGlobal.Checked := True 122 | end else 123 | begin 124 | RBGlobal.Checked := True; 125 | RBSelectedOnly.Enabled := False; 126 | end; 127 | end; 128 | end; 129 | 130 | end. 131 | -------------------------------------------------------------------------------- /demos/kicon/Demo.dpr: -------------------------------------------------------------------------------- 1 | program Demo; 2 | 3 | {$include KControls.inc} 4 | 5 | uses 6 | Forms, 7 | Main in 'Main.pas' {MainForm}; 8 | 9 | {$R *.res} 10 | {$R XPman.res} 11 | 12 | begin 13 | {$IFDEF COMPILER10_UP} 14 | ReportMemoryLeaksOnShutdown := DebugHook <> 0; 15 | {$ENDIF} 16 | Application.Initialize; 17 | Application.CreateForm(TMainForm, MainForm); 18 | Application.Run; 19 | end. 20 | -------------------------------------------------------------------------------- /demos/kicon/Demo.dproj: -------------------------------------------------------------------------------- 1 |  <Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003"> 2 | <PropertyGroup> 3 | <ProjectGuid>{3192E2DF-14FF-44C3-816E-C81FD7957854}</ProjectGuid> 4 | <MainSource>Demo.dpr</MainSource> 5 | <Base>True</Base> 6 | <Config Condition="'$(Config)'==''">Debug</Config> 7 | <Platform>Win32</Platform> 8 | <AppType>Application</AppType> 9 | <FrameworkType>VCL</FrameworkType> 10 | <DCC_DCCCompiler>DCC32</DCC_DCCCompiler> 11 | <ProjectVersion>12.3</ProjectVersion> 12 | </PropertyGroup> 13 | <PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''"> 14 | <Base>true</Base> 15 | </PropertyGroup> 16 | <PropertyGroup Condition="'$(Config)'=='Release' or '$(Cfg_1)'!=''"> 17 | <Cfg_1>true</Cfg_1> 18 | <CfgParent>Base</CfgParent> 19 | <Base>true</Base> 20 | </PropertyGroup> 21 | <PropertyGroup Condition="'$(Config)'=='Debug' or '$(Cfg_2)'!=''"> 22 | <Cfg_2>true</Cfg_2> 23 | <CfgParent>Base</CfgParent> 24 | <Base>true</Base> 25 | </PropertyGroup> 26 | <PropertyGroup Condition="'$(Base)'!=''"> 27 | <DCC_E>false</DCC_E> 28 | <DCC_ImageBase>00400000</DCC_ImageBase> 29 | <DCC_UnitAlias>WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;WinTypes=Windows;WinProcs=Windows;$(DCC_UnitAlias)</DCC_UnitAlias> 30 | <DCC_F>false</DCC_F> 31 | <DCC_S>false</DCC_S> 32 | <DCC_N>false</DCC_N> 33 | <DCC_K>false</DCC_K> 34 | </PropertyGroup> 35 | <PropertyGroup Condition="'$(Cfg_1)'!=''"> 36 | <DCC_LocalDebugSymbols>false</DCC_LocalDebugSymbols> 37 | <DCC_Define>RELEASE;$(DCC_Define)</DCC_Define> 38 | <DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo> 39 | <DCC_DebugInformation>false</DCC_DebugInformation> 40 | </PropertyGroup> 41 | <PropertyGroup Condition="'$(Cfg_2)'!=''"> 42 | <DCC_Define>DEBUG;$(DCC_Define)</DCC_Define> 43 | <DCC_Optimize>false</DCC_Optimize> 44 | <DCC_GenerateStackFrames>true</DCC_GenerateStackFrames> 45 | </PropertyGroup> 46 | <ItemGroup> 47 | <DelphiCompile Include="Demo.dpr"> 48 | <MainSource>MainSource</MainSource> 49 | </DelphiCompile> 50 | <DCCReference Include="Main.pas"> 51 | <Form>MainForm</Form> 52 | </DCCReference> 53 | <BuildConfiguration Include="Debug"> 54 | <Key>Cfg_2</Key> 55 | <CfgParent>Base</CfgParent> 56 | </BuildConfiguration> 57 | <BuildConfiguration Include="Base"> 58 | <Key>Base</Key> 59 | </BuildConfiguration> 60 | <BuildConfiguration Include="Release"> 61 | <Key>Cfg_1</Key> 62 | <CfgParent>Base</CfgParent> 63 | </BuildConfiguration> 64 | </ItemGroup> 65 | <Import Condition="Exists('$(BDS)\Bin\CodeGear.Delphi.Targets')" Project="$(BDS)\Bin\CodeGear.Delphi.Targets"/> 66 | <Import Condition="Exists('$(APPDATA)\Embarcadero\$(BDSAPPDATABASEDIR)\$(PRODUCTVERSION)\UserTools.proj')" Project="$(APPDATA)\Embarcadero\$(BDSAPPDATABASEDIR)\$(PRODUCTVERSION)\UserTools.proj"/> 67 | <ProjectExtensions> 68 | <Borland.Personality>Delphi.Personality.12</Borland.Personality> 69 | <Borland.ProjectType>VCLApplication</Borland.ProjectType> 70 | <BorlandProject> 71 | <Delphi.Personality> 72 | <Source> 73 | <Source Name="MainSource">Demo.dpr</Source> 74 | </Source> 75 | <VersionInfo> 76 | <VersionInfo Name="IncludeVerInfo">False</VersionInfo> 77 | <VersionInfo Name="AutoIncBuild">False</VersionInfo> 78 | <VersionInfo Name="MajorVer">1</VersionInfo> 79 | <VersionInfo Name="MinorVer">0</VersionInfo> 80 | <VersionInfo Name="Release">0</VersionInfo> 81 | <VersionInfo Name="Build">0</VersionInfo> 82 | <VersionInfo Name="Debug">False</VersionInfo> 83 | <VersionInfo Name="PreRelease">False</VersionInfo> 84 | <VersionInfo Name="Special">False</VersionInfo> 85 | <VersionInfo Name="Private">False</VersionInfo> 86 | <VersionInfo Name="DLL">False</VersionInfo> 87 | <VersionInfo Name="Locale">1029</VersionInfo> 88 | <VersionInfo Name="CodePage">1250</VersionInfo> 89 | </VersionInfo> 90 | <VersionInfoKeys> 91 | <VersionInfoKeys Name="CompanyName"/> 92 | <VersionInfoKeys Name="FileDescription"/> 93 | <VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys> 94 | <VersionInfoKeys Name="InternalName"/> 95 | <VersionInfoKeys Name="LegalCopyright"/> 96 | <VersionInfoKeys Name="LegalTrademarks"/> 97 | <VersionInfoKeys Name="OriginalFilename"/> 98 | <VersionInfoKeys Name="ProductName"/> 99 | <VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys> 100 | <VersionInfoKeys Name="Comments"/> 101 | </VersionInfoKeys> 102 | </Delphi.Personality> 103 | <Platforms> 104 | <Platform value="Win32">True</Platform> 105 | </Platforms> 106 | </BorlandProject> 107 | <ProjectFileVersion>12</ProjectFileVersion> 108 | </ProjectExtensions> 109 | </Project> 110 | -------------------------------------------------------------------------------- /demos/kicon/Demo.manifest: -------------------------------------------------------------------------------- 1 | <?xml version="1.0" encoding="UTF-8" standalone="yes"?> 2 | <assembly xmlns="urn:schemas-microsoft-com:asm.v1" manifestVersion="1.0"> 3 | <assemblyIdentity version="1.0.0.0" processorArchitecture="*" name="CompanyName.ProductName.YourApp" type="win32"/> 4 | <description>Your application description here.</description> 5 | <dependency> 6 | <dependentAssembly> 7 | <assemblyIdentity type="win32" name="Microsoft.Windows.Common-Controls" version="6.0.0.0" processorArchitecture="*" publicKeyToken="6595b64144ccf1df" language="*"/> 8 | </dependentAssembly> 9 | </dependency> 10 | <trustInfo xmlns="urn:schemas-microsoft-com:asm.v3"> 11 | <security> 12 | <requestedPrivileges> 13 | <requestedExecutionLevel level="asInvoker" uiAccess="false"/> 14 | </requestedPrivileges> 15 | </security> 16 | </trustInfo> 17 | </assembly> -------------------------------------------------------------------------------- /demos/kicon/Demo.rc: -------------------------------------------------------------------------------- 1 | #define RT_MANIFEST 24 2 | #define CREATEPROCESS_MANIFEST_RESOURCE_ID 1 3 | #define ISOLATIONAWARE_MANIFEST_RESOURCE_ID 2 4 | #define ISOLATIONAWARE_NOSTATICIMPORT_MANIFEST_RESOURCE_ID 3 5 | 6 | CREATEPROCESS_MANIFEST_RESOURCE_ID RT_MANIFEST "Demo.manifest" 7 | MAINICON ICON "Demo.ico" 8 | -------------------------------------------------------------------------------- /demos/kicon/Demo.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/demos/kicon/Demo.res -------------------------------------------------------------------------------- /demos/kicon/DemoLaz.lpr: -------------------------------------------------------------------------------- 1 | program DemoLaz; 2 | 3 | uses 4 | Interfaces, 5 | Forms, 6 | Main in 'Main.pas' {MainForm}, LResources; 7 | 8 | {$R *.res} 9 | 10 | begin 11 | Application.Initialize; 12 | Application.CreateForm(TMainForm, MainForm); 13 | Application.Run; 14 | end. 15 | -------------------------------------------------------------------------------- /demos/kicon/DemoLaz.manifest: -------------------------------------------------------------------------------- 1 | <?xml version="1.0" encoding="UTF-8" standalone="yes"?> 2 | <assembly xmlns="urn:schemas-microsoft-com:asm.v1" manifestVersion="1.0"> 3 | <assemblyIdentity version="1.0.0.0" processorArchitecture="*" name="CompanyName.ProductName.YourApp" type="win32"/> 4 | <description>Your application description here.</description> 5 | <dependency> 6 | <dependentAssembly> 7 | <assemblyIdentity type="win32" name="Microsoft.Windows.Common-Controls" version="6.0.0.0" processorArchitecture="*" publicKeyToken="6595b64144ccf1df" language="*"/> 8 | </dependentAssembly> 9 | </dependency> 10 | <trustInfo xmlns="urn:schemas-microsoft-com:asm.v3"> 11 | <security> 12 | <requestedPrivileges> 13 | <requestedExecutionLevel level="asInvoker" uiAccess="false"/> 14 | </requestedPrivileges> 15 | </security> 16 | </trustInfo> 17 | </assembly> -------------------------------------------------------------------------------- /demos/kicon/DemoLaz.rc: -------------------------------------------------------------------------------- 1 | #define RT_MANIFEST 24 2 | #define CREATEPROCESS_MANIFEST_RESOURCE_ID 1 3 | #define ISOLATIONAWARE_MANIFEST_RESOURCE_ID 2 4 | #define ISOLATIONAWARE_NOSTATICIMPORT_MANIFEST_RESOURCE_ID 3 5 | 6 | CREATEPROCESS_MANIFEST_RESOURCE_ID RT_MANIFEST "DemoLaz.manifest" 7 | -------------------------------------------------------------------------------- /demos/kicon/DemoLaz.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/demos/kicon/DemoLaz.res -------------------------------------------------------------------------------- /demos/kicon/Demo_Icon.ico: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/demos/kicon/Demo_Icon.ico -------------------------------------------------------------------------------- /demos/kicon/XPman.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/demos/kicon/XPman.res -------------------------------------------------------------------------------- /demos/kmemo/KMemoDemo.dpr: -------------------------------------------------------------------------------- 1 | program KMemoDemo; 2 | 3 | {$include kcontrols.inc} 4 | 5 | uses 6 | Forms, 7 | Main in 'Main.pas' {MainForm}; 8 | 9 | {$R *.res} 10 | 11 | begin 12 | {$IFDEF COMPILER10_UP} 13 | ReportMemoryLeaksOnShutdown := DebugHook <> 0; 14 | {$ENDIF} 15 | Application.Initialize; 16 | Application.MainFormOnTaskbar := True; 17 | Application.CreateForm(TMainForm, MainForm); 18 | Application.Run; 19 | end. 20 | -------------------------------------------------------------------------------- /demos/kmemo/KMemoDemo.dproj: -------------------------------------------------------------------------------- 1 |  <Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003"> 2 | <PropertyGroup> 3 | <ProjectGuid>{0B65B936-3CC2-449E-AD05-CFF98FA86AD2}</ProjectGuid> 4 | <MainSource>KMemoDemo.dpr</MainSource> 5 | <Base>True</Base> 6 | <Config Condition="'$(Config)'==''">Debug</Config> 7 | <Platform>Win32</Platform> 8 | <AppType>Application</AppType> 9 | <FrameworkType>VCL</FrameworkType> 10 | <DCC_DCCCompiler>DCC32</DCC_DCCCompiler> 11 | <ProjectVersion>12.3</ProjectVersion> 12 | </PropertyGroup> 13 | <PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''"> 14 | <Base>true</Base> 15 | </PropertyGroup> 16 | <PropertyGroup Condition="'$(Config)'=='Release' or '$(Cfg_1)'!=''"> 17 | <Cfg_1>true</Cfg_1> 18 | <CfgParent>Base</CfgParent> 19 | <Base>true</Base> 20 | </PropertyGroup> 21 | <PropertyGroup Condition="'$(Config)'=='Debug' or '$(Cfg_2)'!=''"> 22 | <Cfg_2>true</Cfg_2> 23 | <CfgParent>Base</CfgParent> 24 | <Base>true</Base> 25 | </PropertyGroup> 26 | <PropertyGroup Condition="'$(Base)'!=''"> 27 | <DCC_E>false</DCC_E> 28 | <DCC_ImageBase>00400000</DCC_ImageBase> 29 | <DCC_UnitAlias>WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;WinTypes=Windows;WinProcs=Windows;$(DCC_UnitAlias)</DCC_UnitAlias> 30 | <DCC_F>false</DCC_F> 31 | <DCC_S>false</DCC_S> 32 | <DCC_N>false</DCC_N> 33 | <DCC_K>false</DCC_K> 34 | </PropertyGroup> 35 | <PropertyGroup Condition="'$(Cfg_1)'!=''"> 36 | <DCC_LocalDebugSymbols>false</DCC_LocalDebugSymbols> 37 | <DCC_Define>RELEASE;$(DCC_Define)</DCC_Define> 38 | <DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo> 39 | <DCC_DebugInformation>false</DCC_DebugInformation> 40 | </PropertyGroup> 41 | <PropertyGroup Condition="'$(Cfg_2)'!=''"> 42 | <DCC_DebugDCUs>true</DCC_DebugDCUs> 43 | <DCC_Define>DEBUG;$(DCC_Define)</DCC_Define> 44 | <DCC_Optimize>false</DCC_Optimize> 45 | <DCC_GenerateStackFrames>true</DCC_GenerateStackFrames> 46 | </PropertyGroup> 47 | <ItemGroup> 48 | <DelphiCompile Include="KMemoDemo.dpr"> 49 | <MainSource>MainSource</MainSource> 50 | </DelphiCompile> 51 | <DCCReference Include="Main.pas"> 52 | <Form>MainForm</Form> 53 | </DCCReference> 54 | <BuildConfiguration Include="Debug"> 55 | <Key>Cfg_2</Key> 56 | <CfgParent>Base</CfgParent> 57 | </BuildConfiguration> 58 | <BuildConfiguration Include="Base"> 59 | <Key>Base</Key> 60 | </BuildConfiguration> 61 | <BuildConfiguration Include="Release"> 62 | <Key>Cfg_1</Key> 63 | <CfgParent>Base</CfgParent> 64 | </BuildConfiguration> 65 | </ItemGroup> 66 | <Import Condition="Exists('$(BDS)\Bin\CodeGear.Delphi.Targets')" Project="$(BDS)\Bin\CodeGear.Delphi.Targets"/> 67 | <Import Condition="Exists('$(APPDATA)\Embarcadero\$(BDSAPPDATABASEDIR)\$(PRODUCTVERSION)\UserTools.proj')" Project="$(APPDATA)\Embarcadero\$(BDSAPPDATABASEDIR)\$(PRODUCTVERSION)\UserTools.proj"/> 68 | <ProjectExtensions> 69 | <Borland.Personality>Delphi.Personality.12</Borland.Personality> 70 | <Borland.ProjectType>VCLApplication</Borland.ProjectType> 71 | <BorlandProject> 72 | <Delphi.Personality> 73 | <Source> 74 | <Source Name="MainSource">KMemoDemo.dpr</Source> 75 | </Source> 76 | <VersionInfo> 77 | <VersionInfo Name="IncludeVerInfo">False</VersionInfo> 78 | <VersionInfo Name="AutoIncBuild">False</VersionInfo> 79 | <VersionInfo Name="MajorVer">1</VersionInfo> 80 | <VersionInfo Name="MinorVer">0</VersionInfo> 81 | <VersionInfo Name="Release">0</VersionInfo> 82 | <VersionInfo Name="Build">0</VersionInfo> 83 | <VersionInfo Name="Debug">False</VersionInfo> 84 | <VersionInfo Name="PreRelease">False</VersionInfo> 85 | <VersionInfo Name="Special">False</VersionInfo> 86 | <VersionInfo Name="Private">False</VersionInfo> 87 | <VersionInfo Name="DLL">False</VersionInfo> 88 | <VersionInfo Name="Locale">1029</VersionInfo> 89 | <VersionInfo Name="CodePage">1250</VersionInfo> 90 | </VersionInfo> 91 | <VersionInfoKeys> 92 | <VersionInfoKeys Name="CompanyName"/> 93 | <VersionInfoKeys Name="FileDescription"/> 94 | <VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys> 95 | <VersionInfoKeys Name="InternalName"/> 96 | <VersionInfoKeys Name="LegalCopyright"/> 97 | <VersionInfoKeys Name="LegalTrademarks"/> 98 | <VersionInfoKeys Name="OriginalFilename"/> 99 | <VersionInfoKeys Name="ProductName"/> 100 | <VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys> 101 | <VersionInfoKeys Name="Comments"/> 102 | </VersionInfoKeys> 103 | </Delphi.Personality> 104 | <Platforms> 105 | <Platform value="Win32">True</Platform> 106 | </Platforms> 107 | </BorlandProject> 108 | <ProjectFileVersion>12</ProjectFileVersion> 109 | </ProjectExtensions> 110 | </Project> 111 | -------------------------------------------------------------------------------- /demos/kmemo/KMemoDemo.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/demos/kmemo/KMemoDemo.res -------------------------------------------------------------------------------- /demos/kmemo/KMemoDemoLaz.lpi: -------------------------------------------------------------------------------- 1 | <?xml version="1.0" encoding="UTF-8"?> 2 | <CONFIG> 3 | <ProjectOptions> 4 | <Version Value="9"/> 5 | <PathDelim Value="\"/> 6 | <General> 7 | <SessionStorage Value="InProjectDir"/> 8 | <MainUnit Value="0"/> 9 | <Title Value="KMemoDemoLaz"/> 10 | <ResourceType Value="res"/> 11 | <UseXPManifest Value="True"/> 12 | </General> 13 | <i18n> 14 | <EnableI18N LFM="False"/> 15 | </i18n> 16 | <VersionInfo> 17 | <StringTable ProductVersion=""/> 18 | </VersionInfo> 19 | <BuildModes Count="1"> 20 | <Item1 Name="Default" Default="True"/> 21 | </BuildModes> 22 | <PublishOptions> 23 | <Version Value="2"/> 24 | <IncludeFileFilter Value="*.(pas|pp|inc|lfm|lpr|lrs|lpi|lpk|sh|xml)"/> 25 | <ExcludeFileFilter Value="*.(bak|ppu|o|so);*~;backup"/> 26 | </PublishOptions> 27 | <RunParams> 28 | <local> 29 | <FormatVersion Value="1"/> 30 | </local> 31 | </RunParams> 32 | <RequiredPackages Count="2"> 33 | <Item1> 34 | <PackageName Value="KControlsLaz"/> 35 | </Item1> 36 | <Item2> 37 | <PackageName Value="LCL"/> 38 | </Item2> 39 | </RequiredPackages> 40 | <Units Count="2"> 41 | <Unit0> 42 | <Filename Value="KMemoDemoLaz.lpr"/> 43 | <IsPartOfProject Value="True"/> 44 | </Unit0> 45 | <Unit1> 46 | <Filename Value="Main.pas"/> 47 | <IsPartOfProject Value="True"/> 48 | <ComponentName Value="MainForm"/> 49 | <HasResources Value="True"/> 50 | <ResourceBaseClass Value="Form"/> 51 | </Unit1> 52 | </Units> 53 | </ProjectOptions> 54 | <CompilerOptions> 55 | <Version Value="11"/> 56 | <PathDelim Value="\"/> 57 | <Target> 58 | <Filename Value="kmemodemolaz"/> 59 | </Target> 60 | <SearchPaths> 61 | <IncludeFiles Value="..\..\source;$(ProjOutDir)"/> 62 | <UnitOutputDirectory Value="lib\$(TargetCPU)-$(TargetOS)"/> 63 | </SearchPaths> 64 | <Parsing> 65 | <SyntaxOptions> 66 | <UseAnsiStrings Value="False"/> 67 | </SyntaxOptions> 68 | </Parsing> 69 | <CodeGeneration> 70 | <Optimizations> 71 | <OptimizationLevel Value="0"/> 72 | </Optimizations> 73 | </CodeGeneration> 74 | <Linking> 75 | <Options> 76 | <Win32> 77 | <GraphicApplication Value="True"/> 78 | </Win32> 79 | </Options> 80 | </Linking> 81 | </CompilerOptions> 82 | <Debugging> 83 | <Exceptions Count="3"> 84 | <Item1> 85 | <Name Value="EAbort"/> 86 | </Item1> 87 | <Item2> 88 | <Name Value="ECodetoolError"/> 89 | </Item2> 90 | <Item3> 91 | <Name Value="EFOpenError"/> 92 | </Item3> 93 | </Exceptions> 94 | </Debugging> 95 | </CONFIG> 96 | -------------------------------------------------------------------------------- /demos/kmemo/KMemoDemoLaz.lpr: -------------------------------------------------------------------------------- 1 | program KMemoDemoLaz; 2 | 3 | uses 4 | Interfaces, 5 | Forms, 6 | Main; 7 | 8 | {$R *.res} 9 | 10 | begin 11 | Application.Initialize; 12 | Application.MainFormOnTaskbar := True; 13 | Application.CreateForm(TMainForm, MainForm); 14 | Application.Run; 15 | end. 16 | -------------------------------------------------------------------------------- /demos/kmemo/KMemoDemoLaz.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/demos/kmemo/KMemoDemoLaz.res -------------------------------------------------------------------------------- /demos/kmemo/Main.dfm: -------------------------------------------------------------------------------- 1 | object MainForm: TMainForm 2 | Left = 566 3 | Top = 256 4 | Caption = 'KMemoDemo' 5 | ClientHeight = 550 6 | ClientWidth = 988 7 | Color = clBtnFace 8 | Font.Charset = DEFAULT_CHARSET 9 | Font.Color = clWindowText 10 | Font.Height = -11 11 | Font.Name = 'Tahoma' 12 | Font.Style = [] 13 | OldCreateOrder = True 14 | OnCreate = FormCreate 15 | OnResize = FormResize 16 | DesignSize = ( 17 | 988 18 | 550) 19 | PixelsPerInch = 96 20 | TextHeight = 13 21 | object PNMain: TPanel 22 | Left = 0 23 | Top = 0 24 | Width = 988 25 | Height = 505 26 | Align = alTop 27 | Anchors = [akLeft, akTop, akRight, akBottom] 28 | BevelOuter = bvNone 29 | TabOrder = 0 30 | object Splitter1: TSplitter 31 | Left = 500 32 | Top = 0 33 | Height = 505 34 | ExplicitHeight = 513 35 | end 36 | object Panel1: TPanel 37 | Left = 0 38 | Top = 0 39 | Width = 500 40 | Height = 505 41 | Align = alLeft 42 | BevelOuter = bvNone 43 | TabOrder = 0 44 | end 45 | object Panel2: TPanel 46 | Left = 503 47 | Top = 0 48 | Width = 485 49 | Height = 505 50 | Align = alClient 51 | BevelOuter = bvNone 52 | TabOrder = 1 53 | end 54 | end 55 | object BULoad: TButton 56 | Left = 24 57 | Top = 517 58 | Width = 75 59 | Height = 25 60 | Anchors = [akLeft, akBottom] 61 | Caption = 'Load files' 62 | TabOrder = 1 63 | OnClick = BULoadClick 64 | end 65 | object BUPreview: TButton 66 | Left = 105 67 | Top = 517 68 | Width = 75 69 | Height = 25 70 | Anchors = [akLeft, akBottom] 71 | Caption = 'Preview' 72 | TabOrder = 2 73 | OnClick = BUPreviewClick 74 | end 75 | object BUPrint: TButton 76 | Left = 186 77 | Top = 517 78 | Width = 75 79 | Height = 25 80 | Anchors = [akLeft, akBottom] 81 | Caption = 'Print' 82 | TabOrder = 3 83 | OnClick = BUPrintClick 84 | end 85 | object BUTest: TButton 86 | Left = 267 87 | Top = 517 88 | Width = 75 89 | Height = 25 90 | Anchors = [akLeft, akBottom] 91 | Caption = 'Test' 92 | TabOrder = 4 93 | OnClick = BUTestClick 94 | end 95 | object KPrintPreviewDialog1: TKPrintPreviewDialog 96 | Left = 408 97 | Top = 512 98 | end 99 | object KPrintSetupDialog1: TKPrintSetupDialog 100 | Left = 448 101 | Top = 512 102 | end 103 | end 104 | -------------------------------------------------------------------------------- /demos/kmemo/Main.lfm: -------------------------------------------------------------------------------- 1 | object MainForm: TMainForm 2 | Left = 399 3 | Height = 576 4 | Top = 217 5 | Width = 1055 6 | Caption = 'KMemoDemo' 7 | ClientHeight = 576 8 | ClientWidth = 1055 9 | OnCreate = FormCreate 10 | OnResize = FormResize 11 | LCLVersion = '1.4.2.0' 12 | Visible = True 13 | object PNMain: TPanel 14 | Left = 0 15 | Height = 536 16 | Top = 0 17 | Width = 1055 18 | Align = alTop 19 | Anchors = [akTop, akLeft, akRight, akBottom] 20 | BevelOuter = bvNone 21 | ClientHeight = 536 22 | ClientWidth = 1055 23 | TabOrder = 0 24 | object Panel1: TPanel 25 | Left = 0 26 | Height = 536 27 | Top = 0 28 | Width = 523 29 | Align = alLeft 30 | BevelOuter = bvNone 31 | Caption = 'Panel1' 32 | TabOrder = 0 33 | end 34 | object Panel2: TPanel 35 | Left = 528 36 | Height = 536 37 | Top = 0 38 | Width = 527 39 | Align = alClient 40 | BevelOuter = bvNone 41 | Caption = 'Panel2' 42 | TabOrder = 1 43 | end 44 | object Splitter1: TSplitter 45 | Left = 523 46 | Height = 536 47 | Top = 0 48 | Width = 5 49 | end 50 | end 51 | object BULoad: TButton 52 | Left = 16 53 | Height = 25 54 | Top = 544 55 | Width = 112 56 | Anchors = [akLeft, akBottom] 57 | Caption = 'Load files' 58 | OnClick = BULoadClick 59 | TabOrder = 1 60 | end 61 | object BUPreview: TButton 62 | Left = 136 63 | Height = 25 64 | Top = 544 65 | Width = 112 66 | Anchors = [akLeft, akBottom] 67 | Caption = 'Preview' 68 | OnClick = BUPreviewClick 69 | TabOrder = 2 70 | end 71 | object BUPrint: TButton 72 | Left = 256 73 | Height = 25 74 | Top = 544 75 | Width = 112 76 | Anchors = [akLeft, akBottom] 77 | Caption = 'Print' 78 | OnClick = BUPrintClick 79 | TabOrder = 3 80 | end 81 | object BUtest: TButton 82 | Left = 376 83 | Height = 25 84 | Top = 544 85 | Width = 112 86 | Anchors = [akLeft, akBottom] 87 | Caption = 'Test' 88 | OnClick = BULoadClick 89 | TabOrder = 4 90 | end 91 | object KPrintSetupDialog1: TKPrintSetupDialog 92 | left = 448 93 | top = 536 94 | end 95 | object KPrintPreviewDialog1: TKPrintPreviewDialog 96 | left = 496 97 | top = 536 98 | end 99 | end 100 | -------------------------------------------------------------------------------- /demos/kmemo/kmemodemolaz.manifest: -------------------------------------------------------------------------------- 1 | <?xml version="1.0" encoding="UTF-8" standalone="yes"?> 2 | <assembly xmlns="urn:schemas-microsoft-com:asm.v1" manifestVersion="1.0"> 3 | <assemblyIdentity version="1.0.0.0" processorArchitecture="*" name="CompanyName.ProductName.YourApp" type="win32"/> 4 | <description>Your application description here.</description> 5 | <dependency> 6 | <dependentAssembly> 7 | <assemblyIdentity type="win32" name="Microsoft.Windows.Common-Controls" version="6.0.0.0" processorArchitecture="*" publicKeyToken="6595b64144ccf1df" language="*"/> 8 | </dependentAssembly> 9 | </dependency> 10 | <trustInfo xmlns="urn:schemas-microsoft-com:asm.v3"> 11 | <security> 12 | <requestedPrivileges> 13 | <requestedExecutionLevel level="asInvoker" uiAccess="false"/> 14 | </requestedPrivileges> 15 | </security> 16 | </trustInfo> 17 | </assembly> -------------------------------------------------------------------------------- /demos/kmemo/kmemodemolaz.rc: -------------------------------------------------------------------------------- 1 | #define RT_MANIFEST 24 2 | #define CREATEPROCESS_MANIFEST_RESOURCE_ID 1 3 | #define ISOLATIONAWARE_MANIFEST_RESOURCE_ID 2 4 | #define ISOLATIONAWARE_NOSTATICIMPORT_MANIFEST_RESOURCE_ID 3 5 | 6 | CREATEPROCESS_MANIFEST_RESOURCE_ID RT_MANIFEST "kmemodemolaz.manifest" 7 | -------------------------------------------------------------------------------- /demos/kmemo/penguins.jpg: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/demos/kmemo/penguins.jpg -------------------------------------------------------------------------------- /demos/kmemoeditor/KMemoEditor.dpr: -------------------------------------------------------------------------------- 1 | program KMemoEditor; 2 | 3 | uses 4 | Forms, 5 | Main in 'Main.pas' {MainForm}; 6 | 7 | {$R *.res} 8 | 9 | begin 10 | Application.Initialize; 11 | Application.CreateForm(TMainForm, MainForm); 12 | Application.Run; 13 | end. 14 | -------------------------------------------------------------------------------- /demos/kmemoeditor/KMemoEditor.dproj: -------------------------------------------------------------------------------- 1 |  <Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003"> 2 | <PropertyGroup> 3 | <ProjectGuid>{F346F74C-D233-4C7D-BAEC-BC44106D721D}</ProjectGuid> 4 | <MainSource>KMemoEditor.dpr</MainSource> 5 | <Base>True</Base> 6 | <Config Condition="'$(Config)'==''">Debug</Config> 7 | <Platform>Win32</Platform> 8 | <AppType>Application</AppType> 9 | <FrameworkType>VCL</FrameworkType> 10 | <DCC_DCCCompiler>DCC32</DCC_DCCCompiler> 11 | <ProjectVersion>12.3</ProjectVersion> 12 | </PropertyGroup> 13 | <PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''"> 14 | <Base>true</Base> 15 | </PropertyGroup> 16 | <PropertyGroup Condition="'$(Config)'=='Release' or '$(Cfg_1)'!=''"> 17 | <Cfg_1>true</Cfg_1> 18 | <CfgParent>Base</CfgParent> 19 | <Base>true</Base> 20 | </PropertyGroup> 21 | <PropertyGroup Condition="'$(Config)'=='Debug' or '$(Cfg_2)'!=''"> 22 | <Cfg_2>true</Cfg_2> 23 | <CfgParent>Base</CfgParent> 24 | <Base>true</Base> 25 | </PropertyGroup> 26 | <PropertyGroup Condition="'$(Base)'!=''"> 27 | <DCC_E>false</DCC_E> 28 | <DCC_ImageBase>00400000</DCC_ImageBase> 29 | <DCC_UnitAlias>WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;WinTypes=Windows;WinProcs=Windows;$(DCC_UnitAlias)</DCC_UnitAlias> 30 | <DCC_F>false</DCC_F> 31 | <DCC_S>false</DCC_S> 32 | <DCC_N>false</DCC_N> 33 | <DCC_K>false</DCC_K> 34 | </PropertyGroup> 35 | <PropertyGroup Condition="'$(Cfg_1)'!=''"> 36 | <DCC_LocalDebugSymbols>false</DCC_LocalDebugSymbols> 37 | <DCC_Define>RELEASE;$(DCC_Define)</DCC_Define> 38 | <DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo> 39 | <DCC_DebugInformation>false</DCC_DebugInformation> 40 | </PropertyGroup> 41 | <PropertyGroup Condition="'$(Cfg_2)'!=''"> 42 | <DCC_Define>DEBUG;$(DCC_Define)</DCC_Define> 43 | <DCC_Optimize>false</DCC_Optimize> 44 | <DCC_GenerateStackFrames>true</DCC_GenerateStackFrames> 45 | </PropertyGroup> 46 | <ItemGroup> 47 | <DelphiCompile Include="KMemoEditor.dpr"> 48 | <MainSource>MainSource</MainSource> 49 | </DelphiCompile> 50 | <DCCReference Include="Main.pas"> 51 | <Form>MainForm</Form> 52 | </DCCReference> 53 | <BuildConfiguration Include="Debug"> 54 | <Key>Cfg_2</Key> 55 | <CfgParent>Base</CfgParent> 56 | </BuildConfiguration> 57 | <BuildConfiguration Include="Base"> 58 | <Key>Base</Key> 59 | </BuildConfiguration> 60 | <BuildConfiguration Include="Release"> 61 | <Key>Cfg_1</Key> 62 | <CfgParent>Base</CfgParent> 63 | </BuildConfiguration> 64 | </ItemGroup> 65 | <Import Condition="Exists('$(BDS)\Bin\CodeGear.Delphi.Targets')" Project="$(BDS)\Bin\CodeGear.Delphi.Targets"/> 66 | <Import Condition="Exists('$(APPDATA)\Embarcadero\$(BDSAPPDATABASEDIR)\$(PRODUCTVERSION)\UserTools.proj')" Project="$(APPDATA)\Embarcadero\$(BDSAPPDATABASEDIR)\$(PRODUCTVERSION)\UserTools.proj"/> 67 | <ProjectExtensions> 68 | <Borland.Personality>Delphi.Personality.12</Borland.Personality> 69 | <Borland.ProjectType>VCLApplication</Borland.ProjectType> 70 | <BorlandProject> 71 | <Delphi.Personality> 72 | <Source> 73 | <Source Name="MainSource">KMemoEditor.dpr</Source> 74 | </Source> 75 | <VersionInfo> 76 | <VersionInfo Name="IncludeVerInfo">False</VersionInfo> 77 | <VersionInfo Name="AutoIncBuild">False</VersionInfo> 78 | <VersionInfo Name="MajorVer">1</VersionInfo> 79 | <VersionInfo Name="MinorVer">0</VersionInfo> 80 | <VersionInfo Name="Release">0</VersionInfo> 81 | <VersionInfo Name="Build">0</VersionInfo> 82 | <VersionInfo Name="Debug">False</VersionInfo> 83 | <VersionInfo Name="PreRelease">False</VersionInfo> 84 | <VersionInfo Name="Special">False</VersionInfo> 85 | <VersionInfo Name="Private">False</VersionInfo> 86 | <VersionInfo Name="DLL">False</VersionInfo> 87 | <VersionInfo Name="Locale">1029</VersionInfo> 88 | <VersionInfo Name="CodePage">1250</VersionInfo> 89 | </VersionInfo> 90 | <VersionInfoKeys> 91 | <VersionInfoKeys Name="CompanyName"/> 92 | <VersionInfoKeys Name="FileDescription"/> 93 | <VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys> 94 | <VersionInfoKeys Name="InternalName"/> 95 | <VersionInfoKeys Name="LegalCopyright"/> 96 | <VersionInfoKeys Name="LegalTrademarks"/> 97 | <VersionInfoKeys Name="OriginalFilename"/> 98 | <VersionInfoKeys Name="ProductName"/> 99 | <VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys> 100 | <VersionInfoKeys Name="Comments"/> 101 | </VersionInfoKeys> 102 | </Delphi.Personality> 103 | <Platforms> 104 | <Platform value="Win32">True</Platform> 105 | </Platforms> 106 | </BorlandProject> 107 | <ProjectFileVersion>12</ProjectFileVersion> 108 | </ProjectExtensions> 109 | </Project> 110 | -------------------------------------------------------------------------------- /demos/kmemoeditor/KMemoEditor.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/demos/kmemoeditor/KMemoEditor.res -------------------------------------------------------------------------------- /demos/kmemoeditor/KMemoEditorLaz.lpi: -------------------------------------------------------------------------------- 1 | <?xml version="1.0" encoding="UTF-8"?> 2 | <CONFIG> 3 | <ProjectOptions> 4 | <Version Value="9"/> 5 | <PathDelim Value="\"/> 6 | <General> 7 | <Flags> 8 | <MainUnitHasUsesSectionForAllUnits Value="False"/> 9 | <MainUnitHasCreateFormStatements Value="False"/> 10 | <MainUnitHasTitleStatement Value="False"/> 11 | </Flags> 12 | <SessionStorage Value="InProjectDir"/> 13 | <MainUnit Value="0"/> 14 | <Title Value="KMemoEditor"/> 15 | <UseAppBundle Value="False"/> 16 | <ResourceType Value="res"/> 17 | <Icon Value="0"/> 18 | </General> 19 | <i18n> 20 | <EnableI18N LFM="False"/> 21 | </i18n> 22 | <VersionInfo> 23 | <StringTable ProductVersion=""/> 24 | </VersionInfo> 25 | <BuildModes Count="1"> 26 | <Item1 Name="Default" Default="True"/> 27 | </BuildModes> 28 | <PublishOptions> 29 | <Version Value="2"/> 30 | </PublishOptions> 31 | <RunParams> 32 | <local> 33 | <FormatVersion Value="1"/> 34 | </local> 35 | </RunParams> 36 | <RequiredPackages Count="2"> 37 | <Item1> 38 | <PackageName Value="KControlsLaz"/> 39 | </Item1> 40 | <Item2> 41 | <PackageName Value="LCL"/> 42 | </Item2> 43 | </RequiredPackages> 44 | <Units Count="2"> 45 | <Unit0> 46 | <Filename Value="KMemoEditorLaz.lpr"/> 47 | <IsPartOfProject Value="True"/> 48 | </Unit0> 49 | <Unit1> 50 | <Filename Value="Main.pas"/> 51 | <IsPartOfProject Value="True"/> 52 | <ComponentName Value="MainForm"/> 53 | <HasResources Value="True"/> 54 | <ResourceBaseClass Value="Form"/> 55 | </Unit1> 56 | </Units> 57 | </ProjectOptions> 58 | <CompilerOptions> 59 | <Version Value="11"/> 60 | <PathDelim Value="\"/> 61 | <SearchPaths> 62 | <IncludeFiles Value="$(ProjOutDir)"/> 63 | </SearchPaths> 64 | <Parsing> 65 | <SyntaxOptions> 66 | <SyntaxMode Value="Delphi"/> 67 | </SyntaxOptions> 68 | </Parsing> 69 | <Linking> 70 | <Options> 71 | <Win32> 72 | <GraphicApplication Value="True"/> 73 | </Win32> 74 | </Options> 75 | </Linking> 76 | </CompilerOptions> 77 | <Debugging> 78 | <Exceptions Count="3"> 79 | <Item1> 80 | <Name Value="EAbort"/> 81 | </Item1> 82 | <Item2> 83 | <Name Value="ECodetoolError"/> 84 | </Item2> 85 | <Item3> 86 | <Name Value="EFOpenError"/> 87 | </Item3> 88 | </Exceptions> 89 | </Debugging> 90 | </CONFIG> 91 | -------------------------------------------------------------------------------- /demos/kmemoeditor/KMemoEditorLaz.lpr: -------------------------------------------------------------------------------- 1 | program KMemoEditorLaz; 2 | 3 | {$MODE Delphi} 4 | 5 | uses 6 | Forms, Interfaces, 7 | Main in 'Main.pas' {MainForm}; 8 | 9 | {$R *.res} 10 | 11 | begin 12 | Application.Initialize; 13 | Application.MainFormOnTaskbar := True; 14 | Application.CreateForm(TMainForm, MainForm); 15 | Application.Run; 16 | end. -------------------------------------------------------------------------------- /demos/kmemoeditor/KMemoEditorLaz.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/demos/kmemoeditor/KMemoEditorLaz.res -------------------------------------------------------------------------------- /demos/kmemoeditor/Main.dfm: -------------------------------------------------------------------------------- 1 | object MainForm: TMainForm 2 | Left = 650 3 | Top = 177 4 | Caption = 'KMemo editor' 5 | ClientHeight = 457 6 | ClientWidth = 684 7 | Color = clBtnFace 8 | Font.Charset = DEFAULT_CHARSET 9 | Font.Color = clWindowText 10 | Font.Height = -11 11 | Font.Name = 'Tahoma' 12 | Font.Style = [] 13 | OldCreateOrder = False 14 | Position = poScreenCenter 15 | OnCloseQuery = FormCloseQuery 16 | OnCreate = FormCreate 17 | PixelsPerInch = 96 18 | TextHeight = 13 19 | end 20 | -------------------------------------------------------------------------------- /demos/kmemoeditor/Main.lfm: -------------------------------------------------------------------------------- 1 | object MainForm: TMainForm 2 | Left = 469 3 | Height = 457 4 | Top = 328 5 | Width = 684 6 | Caption = 'KMemo editor' 7 | Color = clBtnFace 8 | Font.Color = clWindowText 9 | Font.Height = -11 10 | Font.Name = 'Tahoma' 11 | OnCloseQuery = FormCloseQuery 12 | OnCreate = FormCreate 13 | Position = poScreenCenter 14 | LCLVersion = '1.4.2.0' 15 | end 16 | -------------------------------------------------------------------------------- /demos/kmemoeditor/Main.pas: -------------------------------------------------------------------------------- 1 | unit Main; 2 | 3 | interface 4 | 5 | uses 6 | {$IFDEF FPC} 7 | LCLIntf, LCLType, LMessages, 8 | {$ELSE} 9 | Windows, 10 | {$ENDIF} 11 | Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, 12 | Dialogs, KMemoFrm, KMemo; 13 | 14 | type 15 | 16 | { TMainForm } 17 | 18 | TMainForm = class(TForm) 19 | procedure FormCreate(Sender: TObject); 20 | procedure FormCloseQuery(Sender: TObject; var CanClose: Boolean); 21 | private 22 | { Private declarations } 23 | FFrame: TKMemoFrame; 24 | public 25 | { Public declarations } 26 | end; 27 | 28 | var 29 | MainForm: TMainForm; 30 | 31 | implementation 32 | 33 | {$IFDEF FPC} 34 | {$R *.lfm} 35 | {$ELSE} 36 | {$R *.dfm} 37 | {$ENDIF} 38 | 39 | procedure TMainForm.FormCreate(Sender: TObject); 40 | begin 41 | FFrame := TKMemoFrame.Create(Self); 42 | FFrame.Align := alClient; 43 | FFrame.Parent := Self; 44 | FFrame.OpenFile('kmemo_manual.rtf'); 45 | end; 46 | 47 | procedure TMainForm.FormCloseQuery(Sender: TObject; var CanClose: Boolean); 48 | begin 49 | CanClose := FFrame.SaveFile(False, True); 50 | end; 51 | 52 | end. 53 | -------------------------------------------------------------------------------- /help/kcontrols/KControls.chm: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/help/kcontrols/KControls.chm -------------------------------------------------------------------------------- /kcontrols_readme.txt: -------------------------------------------------------------------------------- 1 | Software: KControls component suite for Delphi and Lazarus 2 | Original authorship: Tomas Krysl (tk@tkweb.eu) 3 | ------------------- 4 | 5 | 6 | LICENSE: 7 | ------------------- 8 | License information for each source file can be found in it's header. 9 | If there is none, the code is public domain. 10 | 11 | 12 | SYSTEM REQUIREMENTS: 13 | ------------------- 14 | - platforms: Win32, Win64, GTK, GTK2, QT, Carbon(untested), WinCE(partially tested) 15 | - works under Delphi 7 and higher (tested on Delphi 7, DelphiXE+) 16 | and Lazarus 1.2.2 and higher 17 | - should work under Delphi 6 18 | - some more problems might be experienced for older Lazarus versions 19 | - see other readme files for additional informations about individual components 20 | 21 | 22 | INSTALLATION: 23 | ------------------- 24 | 1. Compile and install package. It might be needed to specify search path to Source directory in Delphi/RAD Studio. 25 | For Rad Studio XE2 and later add VCL and VCL.Imaging namespaces to Unit Scope Names. 26 | 2. When compiling an application or demo, it might be needed to specify the search path to KControls sources 27 | or JCL sources (if JCL is configured via kcontrols.inc). 28 | 29 | 30 | 31 | TECHNICAL SUPPORT: 32 | ------------------- 33 | Any suggestions, error reports and questions about this software please send to 34 | the author or discuss on http://www.tkweb.eu. 35 | 36 | 37 | INFO FOR CONTRIBUTORS: 38 | ------------------- 39 | You may contribute to this project, in such case send your contributions to the author. 40 | Before sending, be sure to test your contribution thoroughfully. 41 | As KControls is cross platform and cross IDE, ALWAYS test your contribution in following 42 | minimum configuration of IDEs and OSes: 43 | 1. Delphi 7 and latest Delphi XE version under Windows 7 or higher 44 | 2. Lazarus32 and Lazarus64 under Windows 7 or higher 45 | 3. Lazarus32 or Lazarus64 under some version of Linux, preferrably Ubuntu or Kubuntu. 46 | Keep in mind the differences between Delphi and Lazarus (mainly string encoding UTF16 in Delphi vs. UTF8 in Lazarus). 47 | When working with texts, always test with different Unicode characters. 48 | Testing of BiDi features is not required, because they are not supported by KControls. 49 | 50 | 51 | VERSION HISTORY: 52 | ------------------- 53 | Version 1.7 (August 2015): 54 | Added: 55 | -TKMemo major improvements 56 | -TKPageControl, TKSpeedButton, TKSplitter components 57 | -packages up to Delphi XE8 58 | 59 | 60 | Version 1.6 (July 2014): 61 | Added: 62 | -TKDBGrid improvements 63 | -packages for Delphi XE6 64 | 65 | Version 1.5 (July 2014): 66 | Added: 67 | -new components TKBitBtn, TKColorButton, TKMemo (early alpha state!) 68 | -TKGrid improvements 69 | 70 | Version 1.4 (February 2014): 71 | Added: 72 | -new components TKNumberEdit, TKFileNameEdit, TKLog, TKBrowseFolderDialog, 73 | TKLinkLabel, TKGradientLabel, TKPercentProgressBar 74 | -packages up to Delphi XE5 75 | 76 | Version 1.3 (April 2012): 77 | Added: 78 | -packages for Delphi XE2 79 | Modified: 80 | -no separate install packages KGrid, KHexEditor, KIcon 81 | 82 | Version 1.2 (Oktober 2010): 83 | Update - based on KGrid 1.7, KHexEditor 1.5, KIcon 2.2 84 | 85 | Version 1.1 (Oktober 2010): 86 | Update - based on KGrid 1.6, KHexEditor 1.4, KIcon 2.1 87 | 88 | Version 1.0 (October 2009): 89 | Initial release - based on KGrid 1.5, KHexEditor 1.4, KIcon 1.8 -------------------------------------------------------------------------------- /khexeditor_readme.txt: -------------------------------------------------------------------------------- 1 | Software: KhexEditor component for Delphi and Lazarus 2 | Original authorship: Tomas Krysl (tk@tkweb.eu) 3 | ------------------- 4 | 5 | NOTE: 6 | ------------------- 7 | This readme only covers the KHexEditor component. 8 | Refer to kcontrols_readme.txt for installation requirements and other information. 9 | 10 | 11 | PLANNED: 12 | ------------------- 13 | - improve performance for non-Win32 widget sets in Lazarus 14 | - byte swaps (Little and Big Endian) 15 | - considering: visual control of modified text 16 | 17 | 18 | KNOWN PROBLEMS: 19 | ------------------- 20 | Delphi common: 21 | -none, best performance 22 | 23 | Lazarus common: 24 | -slow performance on non-Win32 widget sets 25 | 26 | VERSION HISTORY - NEW KCONTROLS PACKAGE 27 | ------------------- 28 | 29 | VERSION HISTORY - OLD KHEXEDITOR PACKAGE ONLY 30 | ------------------- 31 | Version 1.5 (November 2010) 32 | Added: 33 | -Append method to append data at a position 34 | Modified: 35 | -packages for Delphi XE 36 | 37 | Version 1.4 (October 2009) 38 | Modified: 39 | -printing and previewing to comply with kcontrols.pas 40 | -update to Delphi 2010 41 | -port to Lazarus 42 | 43 | Version 1.3 (October 2008) 44 | Modified: 45 | -update to Delphi 2009 46 | 47 | Version 1.22 (January 2008) 48 | Modified: 49 | -packages included for newer Delphi 50 | 51 | Version 1.21 (June 2006) 52 | Modified: 53 | -bugs fixed when no printer installed 54 | 55 | Version 1.2 (June 2006): 56 | Added: 57 | -runtime package 58 | -UpdateCharMetrics method 59 | -keyboard features into TKHexEditorPrintPreview 60 | Modified: 61 | -UpdateScrollRange modified to avoid 62 | design-time exceptions in the IDE 63 | -minor bugfixes 64 | 65 | Version 1.1 (May 2006): 66 | Added: 67 | -print preview - new component (KHexEditorPreview.pas) 68 | -PaintTo method to paint the outline to another canvas 69 | Modified: 70 | -little modifications 71 | 72 | Version 1.0 (April 2006): Initial release -------------------------------------------------------------------------------- /kicon_readme.txt: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/kicon_readme.txt -------------------------------------------------------------------------------- /kmemo_readme.txt: -------------------------------------------------------------------------------- 1 | Software: KMemo component for Delphi and Lazarus 2 | Original authorship: Tomas Krysl (tk@tkweb.eu) 3 | ------------------- 4 | 5 | NOTE: 6 | ------------------- 7 | This readme only covers the KMemo component. 8 | Refer to kcontrols_readme.txt for installation requirements and other information. 9 | 10 | PLANNED/STILL MISSING: 11 | ------------------- 12 | - fill justify paragraph alignment (now defaults to left justify) 13 | - readers/writers from/into other formats (HTML, ODT, PDF?) 14 | - search/replace commands 15 | - style sheets 16 | - tab stops 17 | - tools for relative objects (images, text boxes), anchors 18 | - tools for tables 19 | - undo/redo commands 20 | 21 | KNOWN PROBLEMS: 22 | ------------------- 23 | - The KMemo word processor may still wrap words incorrectly around relative or absolute shapes in certain cases. 24 | This is because of missing repositioning of whole line after it has been completely measured 25 | and its height increased (e.g. due to bigger font or in-line embedded object). 26 | - Print/Preview does not break pages at line ends 27 | - TKMemo has no page/section/column support 28 | - Loading/Saving RTF documents orignally created in different text processors may result in substantial differences in produced documents, 29 | as only a subset of RTF tags from the RTF specification v 1.9 is supported. RTF compatibility has been primarilly tested 30 | with Microsoft Word which seems to comply with the RTF specification the most. Other text processors (such as LibreOffice Writer) 31 | may show completely different results for RTF documents created by KMemo. 32 | - Microsoft Word will ignore the starting value for numbered lists explicitly set by KMemo. This is because Word creates for every such case 33 | a completely new list which is IMO a smut and I won't follow this. Starting value in KMemo is always bound to the paragraph 34 | and a new RTF control word has been introduced for this: \lsstartat. 35 | Starting value given by list level (\levelstartat) is only used as default starting value. 36 | - Metafiles won't be loaded to KMemo under Linux because of the missing TMetafile support in Lazarus under Linux. 37 | 38 | 39 | CONTRIBUTORS: 40 | ------------------- 41 | 42 | 43 | VERSION HISTORY - NEW KCONTROLS PACKAGE 44 | ------------------- 45 | Version 1.7 (August 2015): 46 | Added: 47 | -many new paragraph and text formatting styles 48 | -TKMemoContainer class to support nested blocks, embedded objects and floating shapes 49 | -Advanced table support through TKMemoTable, TKMemoTableRow and TKMemoTableCell classes 50 | -Advanced list style support through TKMemoListTable, TKMemoList and TKMemoListLevel classes 51 | -Hyperlinks through TKMemoHyperlink class 52 | -Rich Text Format reader and writer (KMemoRTF.pas) 53 | -clipboard operations (copy, cut, paste), also with full Rich Text Format support 54 | -print/preview support 55 | -TKMemoFrame and formatting dialogs that form a simple rich text editor, which you can place to your projects without coding 56 | Modified: 57 | -Reworked text and paragraph formatting through TKMemoTextStyle, TKMemoParaStyle classes 58 | -Reworked TKMemoBlocks, TKMemoTextBlock and TKMemoImageBlock 59 | 60 | Version 1.5 (July 2014): 61 | Added: 62 | -TKMemo component first introduced (early alpha state) 63 | -------------------------------------------------------------------------------- /packages/kcontrols/KControlsDesign.dcr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/packages/kcontrols/KControlsDesign.dcr -------------------------------------------------------------------------------- /packages/kcontrols/KControls_CB2007.cpp: -------------------------------------------------------------------------------- 1 | //--------------------------------------------------------------------------- 2 | 3 | #include <basepch.h> 4 | #pragma hdrstop 5 | #pragma package(smart_init) 6 | //--------------------------------------------------------------------------- 7 | 8 | // Package source. 9 | //--------------------------------------------------------------------------- 10 | 11 | 12 | #pragma argsused 13 | int WINAPI DllEntryPoint(HINSTANCE hinst, unsigned long reason, void*) 14 | { 15 | return 1; 16 | } 17 | //--------------------------------------------------------------------------- 18 | -------------------------------------------------------------------------------- /packages/kcontrols/KControls_CB2007.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/packages/kcontrols/KControls_CB2007.res -------------------------------------------------------------------------------- /packages/kcontrols/KControls_CB2009.cpp: -------------------------------------------------------------------------------- 1 | //--------------------------------------------------------------------------- 2 | 3 | #include <basepch.h> 4 | #pragma hdrstop 5 | #pragma package(smart_init) 6 | //--------------------------------------------------------------------------- 7 | 8 | // Package source. 9 | //--------------------------------------------------------------------------- 10 | 11 | 12 | #pragma argsused 13 | int WINAPI DllEntryPoint(HINSTANCE hinst, unsigned long reason, void*) 14 | { 15 | return 1; 16 | } 17 | //--------------------------------------------------------------------------- 18 | -------------------------------------------------------------------------------- /packages/kcontrols/KControls_CB2009.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/packages/kcontrols/KControls_CB2009.res -------------------------------------------------------------------------------- /packages/kcontrols/KControls_CB_D6.cpp: -------------------------------------------------------------------------------- 1 | //--------------------------------------------------------------------------- 2 | 3 | #include <basepch.h> 4 | #pragma hdrstop 5 | #pragma package(smart_init) 6 | //--------------------------------------------------------------------------- 7 | 8 | // Package source. 9 | //--------------------------------------------------------------------------- 10 | 11 | #pragma argsused 12 | int WINAPI DllEntryPoint(HINSTANCE hinst, unsigned long reason, void*) 13 | { 14 | return 1; 15 | } 16 | //--------------------------------------------------------------------------- 17 | -------------------------------------------------------------------------------- /packages/kcontrols/KControls_CB_D6.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/packages/kcontrols/KControls_CB_D6.res -------------------------------------------------------------------------------- /packages/kcontrols/KControls_CB_DXE.cpp: -------------------------------------------------------------------------------- 1 | //--------------------------------------------------------------------------- 2 | 3 | #include <basepch.h> 4 | #pragma hdrstop 5 | #pragma package(smart_init) 6 | //--------------------------------------------------------------------------- 7 | 8 | // Package source. 9 | //--------------------------------------------------------------------------- 10 | 11 | 12 | #pragma argsused 13 | int WINAPI DllEntryPoint(HINSTANCE hinst, unsigned long reason, void*) 14 | { 15 | return 1; 16 | } 17 | //--------------------------------------------------------------------------- 18 | -------------------------------------------------------------------------------- /packages/kcontrols/KControls_CB_R6.cpp: -------------------------------------------------------------------------------- 1 | //--------------------------------------------------------------------------- 2 | 3 | #include <basepch.h> 4 | #pragma hdrstop 5 | USEFORMNS("..\..\source\kprintpreview.pas", Kprintpreview, KPrintPreviewForm); 6 | USEFORMNS("..\..\source\kprintsetup.pas", Kprintsetup, KPrintSetupForm); 7 | //--------------------------------------------------------------------------- 8 | #pragma package(smart_init) 9 | //--------------------------------------------------------------------------- 10 | 11 | // Package source. 12 | //--------------------------------------------------------------------------- 13 | 14 | #pragma argsused 15 | int WINAPI DllEntryPoint(HINSTANCE hinst, unsigned long reason, void*) 16 | { 17 | return 1; 18 | } 19 | //--------------------------------------------------------------------------- 20 | -------------------------------------------------------------------------------- /packages/kcontrols/KControls_CB_R6.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/packages/kcontrols/KControls_CB_R6.res -------------------------------------------------------------------------------- /packages/kcontrols/KControls_CB_RXE.cpp: -------------------------------------------------------------------------------- 1 | //--------------------------------------------------------------------------- 2 | 3 | #include <basepch.h> 4 | #pragma hdrstop 5 | USEFORMNS("..\..\source\kprintpreview.pas", Kprintpreview, KPrintPreviewForm); 6 | USEFORMNS("..\..\source\kprintsetup.pas", Kprintsetup, KPrintSetupForm); 7 | //--------------------------------------------------------------------------- 8 | #pragma package(smart_init) 9 | //--------------------------------------------------------------------------- 10 | 11 | // Package source. 12 | //--------------------------------------------------------------------------- 13 | 14 | 15 | #pragma argsused 16 | int WINAPI DllEntryPoint(HINSTANCE hinst, unsigned long reason, void*) 17 | { 18 | return 1; 19 | } 20 | //--------------------------------------------------------------------------- 21 | -------------------------------------------------------------------------------- /packages/kcontrols/KControls_D2005.dpk: -------------------------------------------------------------------------------- 1 | package KControls_D2005; 2 | 3 | {$include ..\..\source\kcontrols.inc} 4 | 5 | {$R *.res} 6 | {$ALIGN 8} 7 | {$ASSERTIONS ON} 8 | {$BOOLEVAL OFF} 9 | {$DEBUGINFO ON} 10 | {$EXTENDEDSYNTAX ON} 11 | {$IMPORTEDDATA ON} 12 | {$IOCHECKS ON} 13 | {$LOCALSYMBOLS ON} 14 | {$LONGSTRINGS ON} 15 | {$OPENSTRINGS ON} 16 | {$OPTIMIZATION ON} 17 | {$OVERFLOWCHECKS ON} 18 | {$RANGECHECKS ON} 19 | {$REFERENCEINFO ON} 20 | {$SAFEDIVIDE OFF} 21 | {$STACKFRAMES OFF} 22 | {$TYPEDADDRESS ON} 23 | {$VARSTRINGCHECKS ON} 24 | {$WRITEABLECONST ON} 25 | {$MINENUMSIZE 1} 26 | {$IMAGEBASE $400000} 27 | {$DESCRIPTION 'KControls Development Suite - design time package'} 28 | {$DESIGNONLY} 29 | {$IMPLICITBUILD ON} 30 | 31 | requires 32 | dclstd, 33 | KControls_R2005 34 | {$IFDEF TKDBGRID_USE} 35 | , dbrtl 36 | , vcldb 37 | {$ENDIF} 38 | ; 39 | 40 | contains 41 | kcontrolsdesign in 'kcontrolsdesign.pas', 42 | kpictureeditor in 'kpictureeditor.pas' {KPictureEditForm}; 43 | 44 | end. 45 | -------------------------------------------------------------------------------- /packages/kcontrols/KControls_D2006.dpk: -------------------------------------------------------------------------------- 1 | package KControls_D2006; 2 | 3 | {$include ..\..\source\kcontrols.inc} 4 | 5 | {$R *.res} 6 | {$ALIGN 8} 7 | {$ASSERTIONS ON} 8 | {$BOOLEVAL OFF} 9 | {$DEBUGINFO ON} 10 | {$EXTENDEDSYNTAX ON} 11 | {$IMPORTEDDATA ON} 12 | {$IOCHECKS ON} 13 | {$LOCALSYMBOLS ON} 14 | {$LONGSTRINGS ON} 15 | {$OPENSTRINGS ON} 16 | {$OPTIMIZATION ON} 17 | {$OVERFLOWCHECKS ON} 18 | {$RANGECHECKS ON} 19 | {$REFERENCEINFO ON} 20 | {$SAFEDIVIDE OFF} 21 | {$STACKFRAMES OFF} 22 | {$TYPEDADDRESS ON} 23 | {$VARSTRINGCHECKS ON} 24 | {$WRITEABLECONST ON} 25 | {$MINENUMSIZE 1} 26 | {$IMAGEBASE $400000} 27 | {$DESCRIPTION 'KControls Development Suite - design time package'} 28 | {$DESIGNONLY} 29 | {$IMPLICITBUILD ON} 30 | 31 | requires 32 | dclstd, 33 | KControls_R2006 34 | {$IFDEF TKDBGRID_USE} 35 | , dbrtl 36 | , vcldb 37 | {$ENDIF} 38 | ; 39 | 40 | contains 41 | kcontrolsdesign in 'kcontrolsdesign.pas', 42 | kpictureeditor in 'kpictureeditor.pas' {KPictureEditForm}; 43 | 44 | end. 45 | -------------------------------------------------------------------------------- /packages/kcontrols/KControls_D2007.dpk: -------------------------------------------------------------------------------- 1 | package KControls_D2007; 2 | 3 | {$include ..\..\source\kcontrols.inc} 4 | 5 | {$R *.res} 6 | {$ALIGN 8} 7 | {$ASSERTIONS ON} 8 | {$BOOLEVAL OFF} 9 | {$DEBUGINFO ON} 10 | {$EXTENDEDSYNTAX ON} 11 | {$IMPORTEDDATA ON} 12 | {$IOCHECKS ON} 13 | {$LOCALSYMBOLS ON} 14 | {$LONGSTRINGS ON} 15 | {$OPENSTRINGS ON} 16 | {$OPTIMIZATION ON} 17 | {$OVERFLOWCHECKS ON} 18 | {$RANGECHECKS ON} 19 | {$REFERENCEINFO ON} 20 | {$SAFEDIVIDE OFF} 21 | {$STACKFRAMES OFF} 22 | {$TYPEDADDRESS ON} 23 | {$VARSTRINGCHECKS ON} 24 | {$WRITEABLECONST ON} 25 | {$MINENUMSIZE 1} 26 | {$IMAGEBASE $400000} 27 | {$DESCRIPTION 'KControls Development Suite - design time package'} 28 | {$DESIGNONLY} 29 | {$IMPLICITBUILD ON} 30 | 31 | requires 32 | dclstd, 33 | KControls_R2007 34 | {$IFDEF TKDBGRID_USE} 35 | , dbrtl 36 | , vcldb 37 | {$ENDIF} 38 | ; 39 | 40 | contains 41 | kcontrolsdesign in 'kcontrolsdesign.pas', 42 | kpictureeditor in 'kpictureeditor.pas' {KPictureEditForm}; 43 | 44 | end. 45 | -------------------------------------------------------------------------------- /packages/kcontrols/KControls_D2007.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/packages/kcontrols/KControls_D2007.res -------------------------------------------------------------------------------- /packages/kcontrols/KControls_D2009.dpk: -------------------------------------------------------------------------------- 1 | package KControls_D2009; 2 | 3 | {$include ..\..\source\kcontrols.inc} 4 | 5 | {$R *.res} 6 | {$ALIGN 8} 7 | {$ASSERTIONS ON} 8 | {$BOOLEVAL OFF} 9 | {$DEBUGINFO ON} 10 | {$EXTENDEDSYNTAX ON} 11 | {$IMPORTEDDATA ON} 12 | {$IOCHECKS ON} 13 | {$LOCALSYMBOLS ON} 14 | {$LONGSTRINGS ON} 15 | {$OPENSTRINGS ON} 16 | {$OPTIMIZATION ON} 17 | {$OVERFLOWCHECKS ON} 18 | {$RANGECHECKS ON} 19 | {$REFERENCEINFO ON} 20 | {$SAFEDIVIDE OFF} 21 | {$STACKFRAMES OFF} 22 | {$TYPEDADDRESS ON} 23 | {$VARSTRINGCHECKS ON} 24 | {$WRITEABLECONST ON} 25 | {$MINENUMSIZE 1} 26 | {$IMAGEBASE $400000} 27 | {$DESCRIPTION 'KControls Development Suite - design time package'} 28 | {$DESIGNONLY} 29 | {$IMPLICITBUILD ON} 30 | 31 | requires 32 | dclstd, 33 | KControls_R2009 34 | {$IFDEF TKDBGRID_USE} 35 | , dbrtl 36 | , vcldb 37 | {$ENDIF} 38 | ; 39 | 40 | contains 41 | kcontrolsdesign in 'kcontrolsdesign.pas', 42 | kpictureeditor in 'kpictureeditor.pas' {KPictureEditForm}; 43 | 44 | end. 45 | -------------------------------------------------------------------------------- /packages/kcontrols/KControls_D2009.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/packages/kcontrols/KControls_D2009.res -------------------------------------------------------------------------------- /packages/kcontrols/KControls_D2010.dpk: -------------------------------------------------------------------------------- 1 | package KControls_D2010; 2 | 3 | {$include ..\..\source\kcontrols.inc} 4 | 5 | {$R *.res} 6 | {$ALIGN 8} 7 | {$ASSERTIONS ON} 8 | {$BOOLEVAL OFF} 9 | {$DEBUGINFO ON} 10 | {$EXTENDEDSYNTAX ON} 11 | {$IMPORTEDDATA ON} 12 | {$IOCHECKS ON} 13 | {$LOCALSYMBOLS ON} 14 | {$LONGSTRINGS ON} 15 | {$OPENSTRINGS ON} 16 | {$OPTIMIZATION ON} 17 | {$OVERFLOWCHECKS ON} 18 | {$RANGECHECKS ON} 19 | {$REFERENCEINFO ON} 20 | {$SAFEDIVIDE OFF} 21 | {$STACKFRAMES OFF} 22 | {$TYPEDADDRESS ON} 23 | {$VARSTRINGCHECKS ON} 24 | {$WRITEABLECONST ON} 25 | {$MINENUMSIZE 1} 26 | {$IMAGEBASE $400000} 27 | {$DESCRIPTION 'KControls Development Suite - design time package'} 28 | {$DESIGNONLY} 29 | {$IMPLICITBUILD ON} 30 | 31 | requires 32 | dclstd, 33 | KControls_R2010 34 | {$IFDEF TKDBGRID_USE} 35 | , dbrtl 36 | , vcldb 37 | {$ENDIF} 38 | ; 39 | 40 | contains 41 | kcontrolsdesign in 'kcontrolsdesign.pas', 42 | kpictureeditor in 'kpictureeditor.pas' {KPictureEditForm}; 43 | 44 | end. 45 | -------------------------------------------------------------------------------- /packages/kcontrols/KControls_D2010.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/packages/kcontrols/KControls_D2010.res -------------------------------------------------------------------------------- /packages/kcontrols/KControls_D6.dpk: -------------------------------------------------------------------------------- 1 | package KControls_D6; 2 | 3 | {$include ..\..\source\kcontrols.inc} 4 | 5 | {$R *.res} 6 | {$ALIGN 8} 7 | {$ASSERTIONS ON} 8 | {$BOOLEVAL OFF} 9 | {$DEBUGINFO ON} 10 | {$EXTENDEDSYNTAX ON} 11 | {$IMPORTEDDATA ON} 12 | {$IOCHECKS ON} 13 | {$LOCALSYMBOLS ON} 14 | {$LONGSTRINGS ON} 15 | {$OPENSTRINGS ON} 16 | {$OPTIMIZATION ON} 17 | {$OVERFLOWCHECKS ON} 18 | {$RANGECHECKS ON} 19 | {$REFERENCEINFO ON} 20 | {$SAFEDIVIDE OFF} 21 | {$STACKFRAMES OFF} 22 | {$TYPEDADDRESS ON} 23 | {$VARSTRINGCHECKS ON} 24 | {$WRITEABLECONST ON} 25 | {$MINENUMSIZE 1} 26 | {$IMAGEBASE $400000} 27 | {$DESCRIPTION 'KControls Development Suite - design time package'} 28 | {$DESIGNONLY} 29 | {$IMPLICITBUILD ON} 30 | 31 | requires 32 | dclstd, 33 | KControls_R6 34 | {$IFDEF TKDBGRID_USE} 35 | , dbrtl 36 | , vcldb 37 | {$ENDIF} 38 | ; 39 | 40 | contains 41 | kcontrolsdesign in 'kcontrolsdesign.pas', 42 | kpictureeditor in 'kpictureeditor.pas' {KPictureEditForm}; 43 | 44 | end. 45 | -------------------------------------------------------------------------------- /packages/kcontrols/KControls_D6.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/packages/kcontrols/KControls_D6.res -------------------------------------------------------------------------------- /packages/kcontrols/KControls_D7.dpk: -------------------------------------------------------------------------------- 1 | package KControls_D7; 2 | 3 | {$include ..\..\source\kcontrols.inc} 4 | 5 | {$R *.res} 6 | {$ALIGN 8} 7 | {$ASSERTIONS ON} 8 | {$BOOLEVAL OFF} 9 | {$DEBUGINFO ON} 10 | {$EXTENDEDSYNTAX ON} 11 | {$IMPORTEDDATA ON} 12 | {$IOCHECKS ON} 13 | {$LOCALSYMBOLS ON} 14 | {$LONGSTRINGS ON} 15 | {$OPENSTRINGS ON} 16 | {$OPTIMIZATION ON} 17 | {$OVERFLOWCHECKS ON} 18 | {$RANGECHECKS ON} 19 | {$REFERENCEINFO ON} 20 | {$SAFEDIVIDE OFF} 21 | {$STACKFRAMES OFF} 22 | {$TYPEDADDRESS ON} 23 | {$VARSTRINGCHECKS ON} 24 | {$WRITEABLECONST ON} 25 | {$MINENUMSIZE 1} 26 | {$IMAGEBASE $400000} 27 | {$DESCRIPTION 'KControls Development Suite - design time package'} 28 | {$DESIGNONLY} 29 | {$IMPLICITBUILD ON} 30 | 31 | requires 32 | dclstd, 33 | KControls_R7 34 | {$IFDEF TKDBGRID_USE} 35 | , dbrtl 36 | , vcldb 37 | {$ENDIF} 38 | ; 39 | 40 | contains 41 | kcontrolsdesign in 'kcontrolsdesign.pas', 42 | kpictureeditor in 'kpictureeditor.pas' {KPictureEditForm}; 43 | 44 | end. 45 | -------------------------------------------------------------------------------- /packages/kcontrols/KControls_D7.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/packages/kcontrols/KControls_D7.res -------------------------------------------------------------------------------- /packages/kcontrols/KControls_DXE.dpk: -------------------------------------------------------------------------------- 1 | package KControls_DXE; 2 | 3 | {$include ..\..\source\kcontrols.inc} 4 | 5 | {$R *.res} 6 | {$ALIGN 8} 7 | {$ASSERTIONS ON} 8 | {$BOOLEVAL OFF} 9 | {$DEBUGINFO ON} 10 | {$EXTENDEDSYNTAX ON} 11 | {$IMPORTEDDATA ON} 12 | {$IOCHECKS ON} 13 | {$LOCALSYMBOLS ON} 14 | {$LONGSTRINGS ON} 15 | {$OPENSTRINGS ON} 16 | {$OPTIMIZATION ON} 17 | {$OVERFLOWCHECKS ON} 18 | {$RANGECHECKS ON} 19 | {$REFERENCEINFO ON} 20 | {$SAFEDIVIDE OFF} 21 | {$STACKFRAMES OFF} 22 | {$TYPEDADDRESS ON} 23 | {$VARSTRINGCHECKS ON} 24 | {$WRITEABLECONST ON} 25 | {$MINENUMSIZE 1} 26 | {$IMAGEBASE $400000} 27 | {$DESCRIPTION 'KControls Development Suite - design time package'} 28 | {$DESIGNONLY} 29 | {$IMPLICITBUILD ON} 30 | 31 | requires 32 | dclstd, 33 | KControls_RXE 34 | {$IFDEF TKDBGRID_USE} 35 | , dbrtl 36 | , vcldb 37 | {$ENDIF} 38 | ; 39 | 40 | contains 41 | kcontrolsdesign in 'kcontrolsdesign.pas', 42 | kpictureeditor in 'kpictureeditor.pas' {KPictureEditForm}; 43 | 44 | end. 45 | -------------------------------------------------------------------------------- /packages/kcontrols/KControls_DXE.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/packages/kcontrols/KControls_DXE.res -------------------------------------------------------------------------------- /packages/kcontrols/KControls_DXE2.dpk: -------------------------------------------------------------------------------- 1 | package KControls_DXE2; 2 | 3 | {$include ..\..\source\kcontrols.inc} 4 | 5 | {$R *.res} 6 | {$ALIGN 8} 7 | {$ASSERTIONS ON} 8 | {$BOOLEVAL OFF} 9 | {$DEBUGINFO ON} 10 | {$EXTENDEDSYNTAX ON} 11 | {$IMPORTEDDATA ON} 12 | {$IOCHECKS ON} 13 | {$LOCALSYMBOLS ON} 14 | {$LONGSTRINGS ON} 15 | {$OPENSTRINGS ON} 16 | {$OPTIMIZATION ON} 17 | {$OVERFLOWCHECKS ON} 18 | {$RANGECHECKS ON} 19 | {$REFERENCEINFO ON} 20 | {$SAFEDIVIDE OFF} 21 | {$STACKFRAMES OFF} 22 | {$TYPEDADDRESS ON} 23 | {$VARSTRINGCHECKS ON} 24 | {$WRITEABLECONST ON} 25 | {$MINENUMSIZE 1} 26 | {$IMAGEBASE $400000} 27 | {$DESCRIPTION 'KControls Development Suite - design time package'} 28 | {$DESIGNONLY} 29 | {$IMPLICITBUILD ON} 30 | 31 | requires 32 | dclstd, 33 | KControls_RXE2 34 | {$IFDEF TKDBGRID_USE} 35 | , dbrtl 36 | , vcldb 37 | {$ENDIF} 38 | ; 39 | 40 | contains 41 | kcontrolsdesign in 'kcontrolsdesign.pas', 42 | kpictureeditor in 'kpictureeditor.pas' {KPictureEditForm}; 43 | 44 | end. 45 | -------------------------------------------------------------------------------- /packages/kcontrols/KControls_DXE2.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/packages/kcontrols/KControls_DXE2.res -------------------------------------------------------------------------------- /packages/kcontrols/KControls_DXE3.dpk: -------------------------------------------------------------------------------- 1 | package KControls_DXE3; 2 | 3 | {$include ..\..\source\kcontrols.inc} 4 | 5 | {$R *.res} 6 | {$ALIGN 8} 7 | {$ASSERTIONS ON} 8 | {$BOOLEVAL OFF} 9 | {$DEBUGINFO ON} 10 | {$EXTENDEDSYNTAX ON} 11 | {$IMPORTEDDATA ON} 12 | {$IOCHECKS ON} 13 | {$LOCALSYMBOLS ON} 14 | {$LONGSTRINGS ON} 15 | {$OPENSTRINGS ON} 16 | {$OPTIMIZATION ON} 17 | {$OVERFLOWCHECKS ON} 18 | {$RANGECHECKS ON} 19 | {$REFERENCEINFO ON} 20 | {$SAFEDIVIDE OFF} 21 | {$STACKFRAMES OFF} 22 | {$TYPEDADDRESS ON} 23 | {$VARSTRINGCHECKS ON} 24 | {$WRITEABLECONST ON} 25 | {$MINENUMSIZE 1} 26 | {$IMAGEBASE $400000} 27 | {$DESCRIPTION 'KControls Development Suite - design time package'} 28 | {$DESIGNONLY} 29 | {$IMPLICITBUILD ON} 30 | 31 | requires 32 | dclstd, 33 | KControls_RXE3 34 | {$IFDEF TKDBGRID_USE} 35 | , dbrtl 36 | , vcldb 37 | {$ENDIF} 38 | ; 39 | 40 | contains 41 | kcontrolsdesign in 'kcontrolsdesign.pas', 42 | kpictureeditor in 'kpictureeditor.pas' {KPictureEditForm}; 43 | 44 | end. 45 | -------------------------------------------------------------------------------- /packages/kcontrols/KControls_DXE4.dpk: -------------------------------------------------------------------------------- 1 | package KControls_DXE4; 2 | 3 | {$R *.res} 4 | {$IFDEF IMPLICITBUILDING This IFDEF should not be used by users} 5 | {$ALIGN 8} 6 | {$ASSERTIONS ON} 7 | {$BOOLEVAL OFF} 8 | {$DEBUGINFO ON} 9 | {$EXTENDEDSYNTAX ON} 10 | {$IMPORTEDDATA ON} 11 | {$IOCHECKS ON} 12 | {$LOCALSYMBOLS ON} 13 | {$LONGSTRINGS ON} 14 | {$OPENSTRINGS ON} 15 | {$OPTIMIZATION OFF} 16 | {$OVERFLOWCHECKS ON} 17 | {$RANGECHECKS ON} 18 | {$REFERENCEINFO ON} 19 | {$SAFEDIVIDE OFF} 20 | {$STACKFRAMES ON} 21 | {$TYPEDADDRESS ON} 22 | {$VARSTRINGCHECKS ON} 23 | {$WRITEABLECONST ON} 24 | {$MINENUMSIZE 1} 25 | {$IMAGEBASE $400000} 26 | {$DEFINE USE_THEMES} 27 | {$DEFINE DEBUG} 28 | {$ENDIF IMPLICITBUILDING} 29 | {$DESCRIPTION 'KControls Development Suite - design time package'} 30 | {$DESIGNONLY} 31 | {$IMPLICITBUILD ON} 32 | 33 | requires 34 | dclstd, 35 | KControls_RXE4, 36 | dbrtl, 37 | vcldb; 38 | 39 | contains 40 | kcontrolsdesign in 'kcontrolsdesign.pas', 41 | kpictureeditor in 'kpictureeditor.pas' {KPictureEditForm}; 42 | 43 | end. 44 | -------------------------------------------------------------------------------- /packages/kcontrols/KControls_DXE4.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/packages/kcontrols/KControls_DXE4.res -------------------------------------------------------------------------------- /packages/kcontrols/KControls_DXE5.dpk: -------------------------------------------------------------------------------- 1 | package KControls_DXE5; 2 | 3 | {$include ..\..\source\kcontrols.inc} 4 | 5 | {$R *.res} 6 | {$ALIGN 8} 7 | {$ASSERTIONS ON} 8 | {$BOOLEVAL OFF} 9 | {$DEBUGINFO ON} 10 | {$EXTENDEDSYNTAX ON} 11 | {$IMPORTEDDATA ON} 12 | {$IOCHECKS ON} 13 | {$LOCALSYMBOLS ON} 14 | {$LONGSTRINGS ON} 15 | {$OPENSTRINGS ON} 16 | {$OPTIMIZATION ON} 17 | {$OVERFLOWCHECKS ON} 18 | {$RANGECHECKS ON} 19 | {$REFERENCEINFO ON} 20 | {$SAFEDIVIDE OFF} 21 | {$STACKFRAMES OFF} 22 | {$TYPEDADDRESS ON} 23 | {$VARSTRINGCHECKS ON} 24 | {$WRITEABLECONST ON} 25 | {$MINENUMSIZE 1} 26 | {$IMAGEBASE $400000} 27 | {$DESCRIPTION 'KControls Development Suite - design time package'} 28 | {$DESIGNONLY} 29 | {$IMPLICITBUILD ON} 30 | 31 | requires 32 | dclstd, 33 | KControls_RXE5 34 | {$IFDEF TKDBGRID_USE} 35 | , dbrtl 36 | , vcldb 37 | {$ENDIF} 38 | ; 39 | 40 | contains 41 | kcontrolsdesign in 'kcontrolsdesign.pas', 42 | kpictureeditor in 'kpictureeditor.pas' {KPictureEditForm}; 43 | 44 | end. 45 | -------------------------------------------------------------------------------- /packages/kcontrols/KControls_DXE5.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/packages/kcontrols/KControls_DXE5.res -------------------------------------------------------------------------------- /packages/kcontrols/KControls_DXE6.dpk: -------------------------------------------------------------------------------- 1 | package KControls_DXE6; 2 | 3 | {$include ..\..\source\kcontrols.inc} 4 | 5 | {$R *.res} 6 | {$ALIGN 8} 7 | {$ASSERTIONS ON} 8 | {$BOOLEVAL OFF} 9 | {$DEBUGINFO ON} 10 | {$EXTENDEDSYNTAX ON} 11 | {$IMPORTEDDATA ON} 12 | {$IOCHECKS ON} 13 | {$LOCALSYMBOLS ON} 14 | {$LONGSTRINGS ON} 15 | {$OPENSTRINGS ON} 16 | {$OPTIMIZATION ON} 17 | {$OVERFLOWCHECKS ON} 18 | {$RANGECHECKS ON} 19 | {$REFERENCEINFO ON} 20 | {$SAFEDIVIDE OFF} 21 | {$STACKFRAMES OFF} 22 | {$TYPEDADDRESS ON} 23 | {$VARSTRINGCHECKS ON} 24 | {$WRITEABLECONST ON} 25 | {$MINENUMSIZE 1} 26 | {$IMAGEBASE $400000} 27 | {$DESCRIPTION 'KControls Development Suite - design time package'} 28 | {$DESIGNONLY} 29 | {$IMPLICITBUILD ON} 30 | 31 | requires 32 | dclstd, 33 | KControls_RXE6 34 | {$IFDEF TKDBGRID_USE} 35 | , dbrtl 36 | , vcldb 37 | {$ENDIF} 38 | ; 39 | 40 | contains 41 | kcontrolsdesign in 'kcontrolsdesign.pas', 42 | kpictureeditor in 'kpictureeditor.pas' {KPictureEditForm}; 43 | 44 | end. 45 | -------------------------------------------------------------------------------- /packages/kcontrols/KControls_DXE7.dpk: -------------------------------------------------------------------------------- 1 | package KControls_DXE7; 2 | 3 | {$include ..\..\source\kcontrols.inc} 4 | 5 | {$R *.res} 6 | {$ALIGN 8} 7 | {$ASSERTIONS ON} 8 | {$BOOLEVAL OFF} 9 | {$DEBUGINFO ON} 10 | {$EXTENDEDSYNTAX ON} 11 | {$IMPORTEDDATA ON} 12 | {$IOCHECKS ON} 13 | {$LOCALSYMBOLS ON} 14 | {$LONGSTRINGS ON} 15 | {$OPENSTRINGS ON} 16 | {$OPTIMIZATION ON} 17 | {$OVERFLOWCHECKS ON} 18 | {$RANGECHECKS ON} 19 | {$REFERENCEINFO ON} 20 | {$SAFEDIVIDE OFF} 21 | {$STACKFRAMES OFF} 22 | {$TYPEDADDRESS ON} 23 | {$VARSTRINGCHECKS ON} 24 | {$WRITEABLECONST ON} 25 | {$MINENUMSIZE 1} 26 | {$IMAGEBASE $400000} 27 | {$DESCRIPTION 'KControls Development Suite - design time package'} 28 | {$DESIGNONLY} 29 | {$IMPLICITBUILD ON} 30 | 31 | requires 32 | dclstd, 33 | KControls_RXE7 34 | {$IFDEF TKDBGRID_USE} 35 | , dbrtl 36 | , vcldb 37 | {$ENDIF} 38 | ; 39 | 40 | contains 41 | kcontrolsdesign in 'kcontrolsdesign.pas', 42 | kpictureeditor in 'kpictureeditor.pas' {KPictureEditForm}; 43 | 44 | end. 45 | -------------------------------------------------------------------------------- /packages/kcontrols/KControls_DXE8.dpk: -------------------------------------------------------------------------------- 1 | package KControls_DXE8; 2 | 3 | {$include ..\..\source\kcontrols.inc} 4 | 5 | {$R *.res} 6 | {$ALIGN 8} 7 | {$ASSERTIONS ON} 8 | {$BOOLEVAL OFF} 9 | {$DEBUGINFO ON} 10 | {$EXTENDEDSYNTAX ON} 11 | {$IMPORTEDDATA ON} 12 | {$IOCHECKS ON} 13 | {$LOCALSYMBOLS ON} 14 | {$LONGSTRINGS ON} 15 | {$OPENSTRINGS ON} 16 | {$OPTIMIZATION ON} 17 | {$OVERFLOWCHECKS ON} 18 | {$RANGECHECKS ON} 19 | {$REFERENCEINFO ON} 20 | {$SAFEDIVIDE OFF} 21 | {$STACKFRAMES OFF} 22 | {$TYPEDADDRESS ON} 23 | {$VARSTRINGCHECKS ON} 24 | {$WRITEABLECONST ON} 25 | {$MINENUMSIZE 1} 26 | {$IMAGEBASE $400000} 27 | {$DESCRIPTION 'KControls Development Suite - design time package'} 28 | {$DESIGNONLY} 29 | {$IMPLICITBUILD ON} 30 | 31 | requires 32 | dclstd, 33 | KControls_RXE8 34 | {$IFDEF TKDBGRID_USE} 35 | , dbrtl 36 | , vcldb 37 | {$ENDIF} 38 | ; 39 | 40 | contains 41 | kcontrolsdesign in 'kcontrolsdesign.pas', 42 | kpictureeditor in 'kpictureeditor.pas' {KPictureEditForm}; 43 | 44 | end. 45 | -------------------------------------------------------------------------------- /packages/kcontrols/KControls_DXE8.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/packages/kcontrols/KControls_DXE8.res -------------------------------------------------------------------------------- /packages/kcontrols/KControls_R2005.dpk: -------------------------------------------------------------------------------- 1 | package KControls_R2005; 2 | 3 | {$include ..\..\source\kcontrols.inc} 4 | 5 | {$R *.res} 6 | {$ALIGN 8} 7 | {$ASSERTIONS ON} 8 | {$BOOLEVAL OFF} 9 | {$DEBUGINFO ON} 10 | {$EXTENDEDSYNTAX ON} 11 | {$IMPORTEDDATA ON} 12 | {$IOCHECKS ON} 13 | {$LOCALSYMBOLS ON} 14 | {$LONGSTRINGS ON} 15 | {$OPENSTRINGS ON} 16 | {$OPTIMIZATION ON} 17 | {$OVERFLOWCHECKS ON} 18 | {$RANGECHECKS ON} 19 | {$REFERENCEINFO ON} 20 | {$SAFEDIVIDE OFF} 21 | {$STACKFRAMES OFF} 22 | {$TYPEDADDRESS ON} 23 | {$VARSTRINGCHECKS ON} 24 | {$WRITEABLECONST ON} 25 | {$MINENUMSIZE 1} 26 | {$IMAGEBASE $400000} 27 | {$DESCRIPTION 'KControls Development Suite - runtime package'} 28 | {$RUNONLY} 29 | {$IMPLICITBUILD ON} 30 | 31 | requires 32 | vcl, 33 | vclx, 34 | vcljpg 35 | {$IFDEF TKDBGRID_USE} 36 | , dbrtl 37 | , vcldb 38 | {$ENDIF} 39 | ; 40 | 41 | contains 42 | kcontrols in '..\..\source\kcontrols.pas', 43 | kdialogs in '..\..\source\kdialogs.pas', 44 | keditcommon in '..\..\source\keditcommon.pas', 45 | kfunctions in '..\..\source\kfunctions.pas', 46 | kgraphics in '..\..\source\kgraphics.pas', 47 | kgrids in '..\..\source\kgrids.pas', 48 | kicon in '..\..\source\kicon.pas', 49 | khexeditor in '..\..\source\khexeditor.pas', 50 | kprintpreview in '..\..\source\kprintpreview.pas', 51 | kprintsetup in '..\..\source\kprintsetup.pas', 52 | kwidewinprocs in '..\..\source\kwidewinprocs.pas', 53 | kbuttons in '..\..\source\kbuttons.pas', 54 | kedits in '..\..\source\kedits.pas', 55 | klabels in '..\..\source\klabels.pas', 56 | kmessagebox in '..\..\source\kmessagebox.pas', 57 | kmemo in '..\..\source\kmemo.pas', 58 | klog in '..\..\source\klog.pas', 59 | kprogress in '..\..\source\kprogress.pas', 60 | kres in '..\..\source\kres.pas', 61 | kmemodlghyperlink in '..\..\source\kmemodlghyperlink.pas', 62 | kmemodlgnumbering in '..\..\source\kmemodlgnumbering.pas', 63 | kmemodlgparastyle in '..\..\source\kmemodlgparastyle.pas', 64 | kmemodlgtextstyle in '..\..\source\kmemodlgtextstyle.pas', 65 | kpagecontrol in '..\..\source\kpagecontrol.pas' 66 | {$IFDEF TKDBGRID_USE} 67 | , kdbgrids in '..\..\source\kdbgrids.pas' 68 | {$ENDIF} 69 | ; 70 | end. 71 | -------------------------------------------------------------------------------- /packages/kcontrols/KControls_R2006.dpk: -------------------------------------------------------------------------------- 1 | package KControls_R2006; 2 | 3 | {$include ..\..\source\kcontrols.inc} 4 | 5 | {$R *.res} 6 | {$ALIGN 8} 7 | {$ASSERTIONS ON} 8 | {$BOOLEVAL OFF} 9 | {$DEBUGINFO ON} 10 | {$EXTENDEDSYNTAX ON} 11 | {$IMPORTEDDATA ON} 12 | {$IOCHECKS ON} 13 | {$LOCALSYMBOLS ON} 14 | {$LONGSTRINGS ON} 15 | {$OPENSTRINGS ON} 16 | {$OPTIMIZATION ON} 17 | {$OVERFLOWCHECKS ON} 18 | {$RANGECHECKS ON} 19 | {$REFERENCEINFO ON} 20 | {$SAFEDIVIDE OFF} 21 | {$STACKFRAMES OFF} 22 | {$TYPEDADDRESS ON} 23 | {$VARSTRINGCHECKS ON} 24 | {$WRITEABLECONST ON} 25 | {$MINENUMSIZE 1} 26 | {$IMAGEBASE $400000} 27 | {$DESCRIPTION 'KControls Development Suite - runtime package'} 28 | {$RUNONLY} 29 | {$IMPLICITBUILD ON} 30 | 31 | requires 32 | vcl, 33 | vclx, 34 | vcljpg 35 | {$IFDEF TKDBGRID_USE} 36 | , dbrtl 37 | , vcldb 38 | {$ENDIF} 39 | ; 40 | 41 | contains 42 | kcontrols in '..\..\source\kcontrols.pas', 43 | kdialogs in '..\..\source\kdialogs.pas', 44 | keditcommon in '..\..\source\keditcommon.pas', 45 | kfunctions in '..\..\source\kfunctions.pas', 46 | kgraphics in '..\..\source\kgraphics.pas', 47 | kgrids in '..\..\source\kgrids.pas', 48 | kicon in '..\..\source\kicon.pas', 49 | khexeditor in '..\..\source\khexeditor.pas', 50 | kprintpreview in '..\..\source\kprintpreview.pas', 51 | kprintsetup in '..\..\source\kprintsetup.pas', 52 | kwidewinprocs in '..\..\source\kwidewinprocs.pas', 53 | kbuttons in '..\..\source\kbuttons.pas', 54 | kedits in '..\..\source\kedits.pas', 55 | klabels in '..\..\source\klabels.pas', 56 | kmemo in '..\..\source\kmemo.pas', 57 | kmessagebox in '..\..\source\kmessagebox.pas', 58 | klog in '..\..\source\klog.pas', 59 | kprogress in '..\..\source\kprogress.pas', 60 | kres in '..\..\source\kres.pas', 61 | kmemodlghyperlink in '..\..\source\kmemodlghyperlink.pas', 62 | kmemodlgnumbering in '..\..\source\kmemodlgnumbering.pas', 63 | kmemodlgparastyle in '..\..\source\kmemodlgparastyle.pas', 64 | kmemodlgtextstyle in '..\..\source\kmemodlgtextstyle.pas', 65 | kpagecontrol in '..\..\source\kpagecontrol.pas' 66 | {$IFDEF TKDBGRID_USE} 67 | , kdbgrids in '..\..\source\kdbgrids.pas' 68 | {$ENDIF} 69 | ; 70 | end. 71 | -------------------------------------------------------------------------------- /packages/kcontrols/KControls_R2007.dpk: -------------------------------------------------------------------------------- 1 | package KControls_R2007; 2 | 3 | {$include ..\..\source\kcontrols.inc} 4 | 5 | {$R *.res} 6 | {$ALIGN 8} 7 | {$ASSERTIONS ON} 8 | {$BOOLEVAL OFF} 9 | {$DEBUGINFO ON} 10 | {$EXTENDEDSYNTAX ON} 11 | {$IMPORTEDDATA ON} 12 | {$IOCHECKS ON} 13 | {$LOCALSYMBOLS ON} 14 | {$LONGSTRINGS ON} 15 | {$OPENSTRINGS ON} 16 | {$OPTIMIZATION ON} 17 | {$OVERFLOWCHECKS ON} 18 | {$RANGECHECKS ON} 19 | {$REFERENCEINFO ON} 20 | {$SAFEDIVIDE OFF} 21 | {$STACKFRAMES OFF} 22 | {$TYPEDADDRESS ON} 23 | {$VARSTRINGCHECKS ON} 24 | {$WRITEABLECONST ON} 25 | {$MINENUMSIZE 1} 26 | {$IMAGEBASE $400000} 27 | {$DESCRIPTION 'KControls Development Suite - runtime package'} 28 | {$RUNONLY} 29 | {$IMPLICITBUILD ON} 30 | 31 | requires 32 | vcl, 33 | vclx, 34 | vcljpg 35 | {$IFDEF TKDBGRID_USE} 36 | , dbrtl 37 | , vcldb 38 | {$ENDIF} 39 | ; 40 | 41 | contains 42 | kcontrols in '..\..\source\kcontrols.pas', 43 | kdialogs in '..\..\source\kdialogs.pas', 44 | keditcommon in '..\..\source\keditcommon.pas', 45 | kfunctions in '..\..\source\kfunctions.pas', 46 | kgraphics in '..\..\source\kgraphics.pas', 47 | kgrids in '..\..\source\kgrids.pas', 48 | kicon in '..\..\source\kicon.pas', 49 | khexeditor in '..\..\source\khexeditor.pas', 50 | kprintpreview in '..\..\source\kprintpreview.pas', 51 | kprintsetup in '..\..\source\kprintsetup.pas', 52 | kwidewinprocs in '..\..\source\kwidewinprocs.pas', 53 | kbuttons in '..\..\source\kbuttons.pas', 54 | kedits in '..\..\source\kedits.pas', 55 | klabels in '..\..\source\klabels.pas', 56 | kmemo in '..\..\source\kmemo.pas', 57 | kmessagebox in '..\..\source\kmessagebox.pas', 58 | klog in '..\..\source\klog.pas', 59 | kprogress in '..\..\source\kprogress.pas', 60 | kres in '..\..\source\kres.pas', 61 | kmemodlghyperlink in '..\..\source\kmemodlghyperlink.pas', 62 | kmemodlgnumbering in '..\..\source\kmemodlgnumbering.pas', 63 | kmemodlgparastyle in '..\..\source\kmemodlgparastyle.pas', 64 | kmemodlgtextstyle in '..\..\source\kmemodlgtextstyle.pas', 65 | kpagecontrol in '..\..\source\kpagecontrol.pas' 66 | {$IFDEF TKDBGRID_USE} 67 | , kdbgrids in '..\..\source\kdbgrids.pas' 68 | {$ENDIF} 69 | ; 70 | end. 71 | -------------------------------------------------------------------------------- /packages/kcontrols/KControls_R2007.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/packages/kcontrols/KControls_R2007.res -------------------------------------------------------------------------------- /packages/kcontrols/KControls_R2009.dpk: -------------------------------------------------------------------------------- 1 | package KControls_R2009; 2 | 3 | {$include ..\..\source\kcontrols.inc} 4 | 5 | {$R *.res} 6 | {$ALIGN 8} 7 | {$ASSERTIONS ON} 8 | {$BOOLEVAL OFF} 9 | {$DEBUGINFO ON} 10 | {$EXTENDEDSYNTAX ON} 11 | {$IMPORTEDDATA ON} 12 | {$IOCHECKS ON} 13 | {$LOCALSYMBOLS ON} 14 | {$LONGSTRINGS ON} 15 | {$OPENSTRINGS ON} 16 | {$OPTIMIZATION ON} 17 | {$OVERFLOWCHECKS ON} 18 | {$RANGECHECKS ON} 19 | {$REFERENCEINFO ON} 20 | {$SAFEDIVIDE OFF} 21 | {$STACKFRAMES OFF} 22 | {$TYPEDADDRESS ON} 23 | {$VARSTRINGCHECKS ON} 24 | {$WRITEABLECONST ON} 25 | {$MINENUMSIZE 1} 26 | {$IMAGEBASE $400000} 27 | {$DESCRIPTION 'KControls Development Suite - runtime package'} 28 | {$RUNONLY} 29 | {$IMPLICITBUILD ON} 30 | 31 | requires 32 | vcl, 33 | vclx, 34 | vclimg 35 | {$IFDEF TKDBGRID_USE} 36 | , dbrtl 37 | , vcldb 38 | {$ENDIF} 39 | ; 40 | 41 | contains 42 | kcontrols in '..\..\source\kcontrols.pas', 43 | kdialogs in '..\..\source\kdialogs.pas', 44 | keditcommon in '..\..\source\keditcommon.pas', 45 | kfunctions in '..\..\source\kfunctions.pas', 46 | kgraphics in '..\..\source\kgraphics.pas', 47 | kgrids in '..\..\source\kgrids.pas', 48 | kicon in '..\..\source\kicon.pas', 49 | khexeditor in '..\..\source\khexeditor.pas', 50 | kprintpreview in '..\..\source\kprintpreview.pas', 51 | kprintsetup in '..\..\source\kprintsetup.pas', 52 | kwidewinprocs in '..\..\source\kwidewinprocs.pas', 53 | kbuttons in '..\..\source\kbuttons.pas', 54 | kedits in '..\..\source\kedits.pas', 55 | klabels in '..\..\source\klabels.pas', 56 | kmemo in '..\..\source\kmemo.pas', 57 | kmessagebox in '..\..\source\kmessagebox.pas', 58 | klog in '..\..\source\klog.pas', 59 | kprogress in '..\..\source\kprogress.pas', 60 | kres in '..\..\source\kres.pas', 61 | kmemodlghyperlink in '..\..\source\kmemodlghyperlink.pas', 62 | kmemodlgnumbering in '..\..\source\kmemodlgnumbering.pas', 63 | kmemodlgparastyle in '..\..\source\kmemodlgparastyle.pas', 64 | kmemodlgtextstyle in '..\..\source\kmemodlgtextstyle.pas', 65 | kpagecontrol in '..\..\source\kpagecontrol.pas' 66 | {$IFDEF TKDBGRID_USE} 67 | , kdbgrids in '..\..\source\kdbgrids.pas' 68 | {$ENDIF} 69 | ; 70 | end. 71 | -------------------------------------------------------------------------------- /packages/kcontrols/KControls_R2009.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/packages/kcontrols/KControls_R2009.res -------------------------------------------------------------------------------- /packages/kcontrols/KControls_R2010.dpk: -------------------------------------------------------------------------------- 1 | package KControls_R2010; 2 | 3 | {$include ..\..\source\kcontrols.inc} 4 | 5 | {$R *.res} 6 | {$ALIGN 8} 7 | {$ASSERTIONS ON} 8 | {$BOOLEVAL OFF} 9 | {$DEBUGINFO ON} 10 | {$EXTENDEDSYNTAX ON} 11 | {$IMPORTEDDATA ON} 12 | {$IOCHECKS ON} 13 | {$LOCALSYMBOLS ON} 14 | {$LONGSTRINGS ON} 15 | {$OPENSTRINGS ON} 16 | {$OPTIMIZATION ON} 17 | {$OVERFLOWCHECKS ON} 18 | {$RANGECHECKS ON} 19 | {$REFERENCEINFO ON} 20 | {$SAFEDIVIDE OFF} 21 | {$STACKFRAMES OFF} 22 | {$TYPEDADDRESS ON} 23 | {$VARSTRINGCHECKS ON} 24 | {$WRITEABLECONST ON} 25 | {$MINENUMSIZE 1} 26 | {$IMAGEBASE $400000} 27 | {$DESCRIPTION 'KControls Development Suite - runtime package'} 28 | {$RUNONLY} 29 | {$IMPLICITBUILD ON} 30 | 31 | requires 32 | vcl, 33 | vclx, 34 | vclimg 35 | {$IFDEF TKDBGRID_USE} 36 | , dbrtl 37 | , vcldb 38 | {$ENDIF} 39 | ; 40 | 41 | contains 42 | kcontrols in '..\..\source\kcontrols.pas', 43 | kdialogs in '..\..\source\kdialogs.pas', 44 | keditcommon in '..\..\source\keditcommon.pas', 45 | kfunctions in '..\..\source\kfunctions.pas', 46 | kgraphics in '..\..\source\kgraphics.pas', 47 | kgrids in '..\..\source\kgrids.pas', 48 | kicon in '..\..\source\kicon.pas', 49 | khexeditor in '..\..\source\khexeditor.pas', 50 | kprintpreview in '..\..\source\kprintpreview.pas', 51 | kprintsetup in '..\..\source\kprintsetup.pas', 52 | kwidewinprocs in '..\..\source\kwidewinprocs.pas', 53 | kbuttons in '..\..\source\kbuttons.pas', 54 | kedits in '..\..\source\kedits.pas', 55 | klabels in '..\..\source\klabels.pas', 56 | kmemo in '..\..\source\kmemo.pas', 57 | kmessagebox in '..\..\source\kmessagebox.pas', 58 | klog in '..\..\source\klog.pas', 59 | kprogress in '..\..\source\kprogress.pas', 60 | kres in '..\..\source\kres.pas', 61 | kmemodlghyperlink in '..\..\source\kmemodlghyperlink.pas', 62 | kmemodlgnumbering in '..\..\source\kmemodlgnumbering.pas', 63 | kmemodlgparastyle in '..\..\source\kmemodlgparastyle.pas', 64 | kmemodlgtextstyle in '..\..\source\kmemodlgtextstyle.pas', 65 | kpagecontrol in '..\..\source\kpagecontrol.pas' 66 | {$IFDEF TKDBGRID_USE} 67 | , kdbgrids in '..\..\source\kdbgrids.pas' 68 | {$ENDIF} 69 | ; 70 | end. 71 | -------------------------------------------------------------------------------- /packages/kcontrols/KControls_R2010.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/packages/kcontrols/KControls_R2010.res -------------------------------------------------------------------------------- /packages/kcontrols/KControls_R6.dpk: -------------------------------------------------------------------------------- 1 | package KControls_R6; 2 | 3 | {$include ..\..\source\kcontrols.inc} 4 | 5 | {$R *.res} 6 | {$ALIGN 8} 7 | {$ASSERTIONS ON} 8 | {$BOOLEVAL OFF} 9 | {$DEBUGINFO ON} 10 | {$EXTENDEDSYNTAX ON} 11 | {$IMPORTEDDATA ON} 12 | {$IOCHECKS ON} 13 | {$LOCALSYMBOLS ON} 14 | {$LONGSTRINGS ON} 15 | {$OPENSTRINGS ON} 16 | {$OPTIMIZATION ON} 17 | {$OVERFLOWCHECKS ON} 18 | {$RANGECHECKS ON} 19 | {$REFERENCEINFO ON} 20 | {$SAFEDIVIDE OFF} 21 | {$STACKFRAMES OFF} 22 | {$TYPEDADDRESS ON} 23 | {$VARSTRINGCHECKS ON} 24 | {$WRITEABLECONST ON} 25 | {$MINENUMSIZE 1} 26 | {$IMAGEBASE $400000} 27 | {$DESCRIPTION 'KControls Development Suite - runtime package'} 28 | {$RUNONLY} 29 | {$IMPLICITBUILD ON} 30 | 31 | requires 32 | vcl, 33 | vclx, 34 | vcljpg 35 | {$IFDEF TKDBGRID_USE} 36 | , dbrtl 37 | , vcldb 38 | {$ENDIF} 39 | ; 40 | 41 | contains 42 | kcontrols in '..\..\source\kcontrols.pas', 43 | kdialogs in '..\..\source\kdialogs.pas', 44 | keditcommon in '..\..\source\keditcommon.pas', 45 | kfunctions in '..\..\source\kfunctions.pas', 46 | kgraphics in '..\..\source\kgraphics.pas', 47 | kgrids in '..\..\source\kgrids.pas', 48 | kicon in '..\..\source\kicon.pas', 49 | khexeditor in '..\..\source\khexeditor.pas', 50 | kprintpreview in '..\..\source\kprintpreview.pas', 51 | kprintsetup in '..\..\source\kprintsetup.pas', 52 | kwidewinprocs in '..\..\source\kwidewinprocs.pas', 53 | kbuttons in '..\..\source\kbuttons.pas', 54 | kedits in '..\..\source\kedits.pas', 55 | klabels in '..\..\source\klabels.pas', 56 | kmemo in '..\..\source\kmemo.pas', 57 | kmessagebox in '..\..\source\kmessagebox.pas', 58 | klog in '..\..\source\klog.pas', 59 | kprogress in '..\..\source\kprogress.pas', 60 | kres in '..\..\source\kres.pas' 61 | kmemodlghyperlink in '..\..\source\kmemodlghyperlink.pas', 62 | kmemodlgnumbering in '..\..\source\kmemodlgnumbering.pas', 63 | kmemodlgparastyle in '..\..\source\kmemodlgparastyle.pas', 64 | kmemodlgtextstyle in '..\..\source\kmemodlgtextstyle.pas', 65 | kpagecontrol in '..\..\source\kpagecontrol.pas' 66 | {$IFDEF TKDBGRID_USE} 67 | , kdbgrids in '..\..\source\kdbgrids.pas' 68 | {$ENDIF} 69 | ; 70 | end. 71 | -------------------------------------------------------------------------------- /packages/kcontrols/KControls_R6.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/packages/kcontrols/KControls_R6.res -------------------------------------------------------------------------------- /packages/kcontrols/KControls_R7.dpk: -------------------------------------------------------------------------------- 1 | package KControls_R7; 2 | 3 | {$include ..\..\source\kcontrols.inc} 4 | 5 | {$R *.res} 6 | {$ALIGN 8} 7 | {$ASSERTIONS ON} 8 | {$BOOLEVAL OFF} 9 | {$DEBUGINFO ON} 10 | {$EXTENDEDSYNTAX ON} 11 | {$IMPORTEDDATA ON} 12 | {$IOCHECKS ON} 13 | {$LOCALSYMBOLS ON} 14 | {$LONGSTRINGS ON} 15 | {$OPENSTRINGS ON} 16 | {$OPTIMIZATION ON} 17 | {$OVERFLOWCHECKS ON} 18 | {$RANGECHECKS ON} 19 | {$REFERENCEINFO ON} 20 | {$SAFEDIVIDE OFF} 21 | {$STACKFRAMES OFF} 22 | {$TYPEDADDRESS ON} 23 | {$VARSTRINGCHECKS ON} 24 | {$WRITEABLECONST ON} 25 | {$MINENUMSIZE 1} 26 | {$IMAGEBASE $400000} 27 | {$DESCRIPTION 'KControls Development Suite - runtime package'} 28 | {$RUNONLY} 29 | {$IMPLICITBUILD ON} 30 | 31 | requires 32 | vcl, 33 | vclx, 34 | vcljpg 35 | {$IFDEF TKDBGRID_USE} 36 | , dbrtl 37 | , vcldb 38 | {$ENDIF} 39 | ; 40 | 41 | contains 42 | kcontrols in '..\..\source\kcontrols.pas', 43 | kdialogs in '..\..\source\kdialogs.pas', 44 | keditcommon in '..\..\source\keditcommon.pas', 45 | kfunctions in '..\..\source\kfunctions.pas', 46 | kgraphics in '..\..\source\kgraphics.pas', 47 | kgrids in '..\..\source\kgrids.pas', 48 | kicon in '..\..\source\kicon.pas', 49 | khexeditor in '..\..\source\khexeditor.pas', 50 | kprintpreview in '..\..\source\kprintpreview.pas', 51 | kprintsetup in '..\..\source\kprintsetup.pas', 52 | kwidewinprocs in '..\..\source\kwidewinprocs.pas', 53 | kbuttons in '..\..\source\kbuttons.pas', 54 | kedits in '..\..\source\kedits.pas', 55 | klabels in '..\..\source\klabels.pas', 56 | kmemo in '..\..\source\kmemo.pas', 57 | kmessagebox in '..\..\source\kmessagebox.pas', 58 | klog in '..\..\source\klog.pas', 59 | kprogress in '..\..\source\kprogress.pas', 60 | kres in '..\..\source\kres.pas', 61 | kmemodlghyperlink in '..\..\source\kmemodlghyperlink.pas', 62 | kmemodlgnumbering in '..\..\source\kmemodlgnumbering.pas', 63 | kmemodlgparastyle in '..\..\source\kmemodlgparastyle.pas', 64 | kmemodlgtextstyle in '..\..\source\kmemodlgtextstyle.pas', 65 | kpagecontrol in '..\..\source\kpagecontrol.pas' 66 | {$IFDEF TKDBGRID_USE} 67 | , kdbgrids in '..\..\source\kdbgrids.pas' 68 | {$ENDIF} 69 | ; 70 | end. 71 | -------------------------------------------------------------------------------- /packages/kcontrols/KControls_R7.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/packages/kcontrols/KControls_R7.res -------------------------------------------------------------------------------- /packages/kcontrols/KControls_RXE.dpk: -------------------------------------------------------------------------------- 1 | package KControls_RXE; 2 | 3 | {$include ..\..\source\kcontrols.inc} 4 | 5 | {$R *.res} 6 | {$ALIGN 8} 7 | {$ASSERTIONS ON} 8 | {$BOOLEVAL OFF} 9 | {$DEBUGINFO ON} 10 | {$EXTENDEDSYNTAX ON} 11 | {$IMPORTEDDATA ON} 12 | {$IOCHECKS ON} 13 | {$LOCALSYMBOLS ON} 14 | {$LONGSTRINGS ON} 15 | {$OPENSTRINGS ON} 16 | {$OPTIMIZATION ON} 17 | {$OVERFLOWCHECKS ON} 18 | {$RANGECHECKS ON} 19 | {$REFERENCEINFO ON} 20 | {$SAFEDIVIDE OFF} 21 | {$STACKFRAMES OFF} 22 | {$TYPEDADDRESS ON} 23 | {$VARSTRINGCHECKS ON} 24 | {$WRITEABLECONST ON} 25 | {$MINENUMSIZE 1} 26 | {$IMAGEBASE $400000} 27 | {$DESCRIPTION 'KControls Development Suite - runtime package'} 28 | {$RUNONLY} 29 | {$IMPLICITBUILD ON} 30 | 31 | requires 32 | vcl, 33 | vclx, 34 | vclimg 35 | {$IFDEF TKDBGRID_USE} 36 | , dbrtl 37 | , vcldb 38 | {$ENDIF} 39 | ; 40 | 41 | contains 42 | kcontrols in '..\..\source\kcontrols.pas', 43 | kdialogs in '..\..\source\kdialogs.pas', 44 | keditcommon in '..\..\source\keditcommon.pas', 45 | kfunctions in '..\..\source\kfunctions.pas', 46 | kgraphics in '..\..\source\kgraphics.pas', 47 | kgrids in '..\..\source\kgrids.pas', 48 | kicon in '..\..\source\kicon.pas', 49 | khexeditor in '..\..\source\khexeditor.pas', 50 | kprintpreview in '..\..\source\kprintpreview.pas', 51 | kprintsetup in '..\..\source\kprintsetup.pas', 52 | kwidewinprocs in '..\..\source\kwidewinprocs.pas', 53 | kbuttons in '..\..\source\kbuttons.pas', 54 | kedits in '..\..\source\kedits.pas', 55 | klabels in '..\..\source\klabels.pas', 56 | kmemo in '..\..\source\kmemo.pas', 57 | kmessagebox in '..\..\source\kmessagebox.pas', 58 | klog in '..\..\source\klog.pas', 59 | kprogress in '..\..\source\kprogress.pas', 60 | kres in '..\..\source\kres.pas', 61 | kmemodlghyperlink in '..\..\source\kmemodlghyperlink.pas', 62 | kmemodlgnumbering in '..\..\source\kmemodlgnumbering.pas', 63 | kmemodlgparastyle in '..\..\source\kmemodlgparastyle.pas', 64 | kmemodlgtextstyle in '..\..\source\kmemodlgtextstyle.pas', 65 | kpagecontrol in '..\..\source\kpagecontrol.pas' 66 | {$IFDEF TKDBGRID_USE} 67 | , kdbgrids in '..\..\source\kdbgrids.pas' 68 | {$ENDIF} 69 | ; 70 | end. 71 | 72 | -------------------------------------------------------------------------------- /packages/kcontrols/KControls_RXE.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/packages/kcontrols/KControls_RXE.res -------------------------------------------------------------------------------- /packages/kcontrols/KControls_RXE2.dpk: -------------------------------------------------------------------------------- 1 | package KControls_RXE2; 2 | 3 | {$include ..\..\source\kcontrols.inc} 4 | 5 | {$R *.res} 6 | {$ALIGN 8} 7 | {$ASSERTIONS ON} 8 | {$BOOLEVAL OFF} 9 | {$DEBUGINFO ON} 10 | {$EXTENDEDSYNTAX ON} 11 | {$IMPORTEDDATA ON} 12 | {$IOCHECKS ON} 13 | {$LOCALSYMBOLS ON} 14 | {$LONGSTRINGS ON} 15 | {$OPENSTRINGS ON} 16 | {$OPTIMIZATION ON} 17 | {$OVERFLOWCHECKS ON} 18 | {$RANGECHECKS ON} 19 | {$REFERENCEINFO ON} 20 | {$SAFEDIVIDE OFF} 21 | {$STACKFRAMES OFF} 22 | {$TYPEDADDRESS ON} 23 | {$VARSTRINGCHECKS ON} 24 | {$WRITEABLECONST ON} 25 | {$MINENUMSIZE 1} 26 | {$IMAGEBASE $400000} 27 | {$DESCRIPTION 'KControls Development Suite - runtime package'} 28 | {$RUNONLY} 29 | {$IMPLICITBUILD ON} 30 | 31 | requires 32 | vcl, 33 | vclx, 34 | vclimg 35 | {$IFDEF TKDBGRID_USE} 36 | , dbrtl 37 | , vcldb 38 | {$ENDIF} 39 | ; 40 | 41 | contains 42 | kcontrols in '..\..\source\kcontrols.pas', 43 | kdialogs in '..\..\source\kdialogs.pas', 44 | keditcommon in '..\..\source\keditcommon.pas', 45 | kfunctions in '..\..\source\kfunctions.pas', 46 | kgraphics in '..\..\source\kgraphics.pas', 47 | kgrids in '..\..\source\kgrids.pas', 48 | kicon in '..\..\source\kicon.pas', 49 | khexeditor in '..\..\source\khexeditor.pas', 50 | kprintpreview in '..\..\source\kprintpreview.pas', 51 | kprintsetup in '..\..\source\kprintsetup.pas', 52 | kwidewinprocs in '..\..\source\kwidewinprocs.pas', 53 | kbuttons in '..\..\source\kbuttons.pas', 54 | kedits in '..\..\source\kedits.pas', 55 | klabels in '..\..\source\klabels.pas', 56 | kmemo in '..\..\source\kmemo.pas', 57 | kmessagebox in '..\..\source\kmessagebox.pas', 58 | klog in '..\..\source\klog.pas', 59 | kprogress in '..\..\source\kprogress.pas', 60 | kres in '..\..\source\kres.pas', 61 | kmemodlghyperlink in '..\..\source\kmemodlghyperlink.pas', 62 | kmemodlgnumbering in '..\..\source\kmemodlgnumbering.pas', 63 | kmemodlgparastyle in '..\..\source\kmemodlgparastyle.pas', 64 | kmemodlgtextstyle in '..\..\source\kmemodlgtextstyle.pas', 65 | kpagecontrol in '..\..\source\kpagecontrol.pas' 66 | {$IFDEF TKDBGRID_USE} 67 | , kdbgrids in '..\..\source\kdbgrids.pas' 68 | {$ENDIF} 69 | ; 70 | 71 | end. 72 | -------------------------------------------------------------------------------- /packages/kcontrols/KControls_RXE2.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/packages/kcontrols/KControls_RXE2.res -------------------------------------------------------------------------------- /packages/kcontrols/KControls_RXE3.dpk: -------------------------------------------------------------------------------- 1 | package KControls_RXE3; 2 | 3 | {$include ..\..\source\kcontrols.inc} 4 | 5 | {$R *.res} 6 | {$ALIGN 8} 7 | {$ASSERTIONS ON} 8 | {$BOOLEVAL OFF} 9 | {$DEBUGINFO ON} 10 | {$EXTENDEDSYNTAX ON} 11 | {$IMPORTEDDATA ON} 12 | {$IOCHECKS ON} 13 | {$LOCALSYMBOLS ON} 14 | {$LONGSTRINGS ON} 15 | {$OPENSTRINGS ON} 16 | {$OPTIMIZATION ON} 17 | {$OVERFLOWCHECKS ON} 18 | {$RANGECHECKS ON} 19 | {$REFERENCEINFO ON} 20 | {$SAFEDIVIDE OFF} 21 | {$STACKFRAMES OFF} 22 | {$TYPEDADDRESS ON} 23 | {$VARSTRINGCHECKS ON} 24 | {$WRITEABLECONST ON} 25 | {$MINENUMSIZE 1} 26 | {$IMAGEBASE $400000} 27 | {$DESCRIPTION 'KControls Development Suite - runtime package'} 28 | {$RUNONLY} 29 | {$IMPLICITBUILD ON} 30 | 31 | requires 32 | vcl, 33 | vclx, 34 | vclimg 35 | {$IFDEF TKDBGRID_USE} 36 | , dbrtl 37 | , vcldb 38 | {$ENDIF} 39 | ; 40 | 41 | contains 42 | kcontrols in '..\..\source\kcontrols.pas', 43 | kdialogs in '..\..\source\kdialogs.pas', 44 | keditcommon in '..\..\source\keditcommon.pas', 45 | kfunctions in '..\..\source\kfunctions.pas', 46 | kgraphics in '..\..\source\kgraphics.pas', 47 | kgrids in '..\..\source\kgrids.pas', 48 | kicon in '..\..\source\kicon.pas', 49 | khexeditor in '..\..\source\khexeditor.pas', 50 | kprintpreview in '..\..\source\kprintpreview.pas', 51 | kprintsetup in '..\..\source\kprintsetup.pas', 52 | kwidewinprocs in '..\..\source\kwidewinprocs.pas', 53 | kbuttons in '..\..\source\kbuttons.pas', 54 | kedits in '..\..\source\kedits.pas', 55 | klabels in '..\..\source\klabels.pas', 56 | kmemo in '..\..\source\kmemo.pas', 57 | kmessagebox in '..\..\source\kmessagebox.pas', 58 | klog in '..\..\source\klog.pas', 59 | kprogress in '..\..\source\kprogress.pas', 60 | kres in '..\..\source\kres.pas', 61 | kmemodlghyperlink in '..\..\source\kmemodlghyperlink.pas', 62 | kmemodlgnumbering in '..\..\source\kmemodlgnumbering.pas', 63 | kmemodlgparastyle in '..\..\source\kmemodlgparastyle.pas', 64 | kmemodlgtextstyle in '..\..\source\kmemodlgtextstyle.pas', 65 | kpagecontrol in '..\..\source\kpagecontrol.pas' 66 | {$IFDEF TKDBGRID_USE} 67 | , kdbgrids in '..\..\source\kdbgrids.pas' 68 | {$ENDIF} 69 | ; 70 | end. 71 | -------------------------------------------------------------------------------- /packages/kcontrols/KControls_RXE4.dpk: -------------------------------------------------------------------------------- 1 | package KControls_RXE4; 2 | 3 | {$R *.res} 4 | {$IFDEF IMPLICITBUILDING This IFDEF should not be used by users} 5 | {$ALIGN 8} 6 | {$ASSERTIONS ON} 7 | {$BOOLEVAL OFF} 8 | {$DEBUGINFO ON} 9 | {$EXTENDEDSYNTAX ON} 10 | {$IMPORTEDDATA ON} 11 | {$IOCHECKS ON} 12 | {$LOCALSYMBOLS ON} 13 | {$LONGSTRINGS ON} 14 | {$OPENSTRINGS ON} 15 | {$OPTIMIZATION OFF} 16 | {$OVERFLOWCHECKS ON} 17 | {$RANGECHECKS ON} 18 | {$REFERENCEINFO ON} 19 | {$SAFEDIVIDE OFF} 20 | {$STACKFRAMES ON} 21 | {$TYPEDADDRESS ON} 22 | {$VARSTRINGCHECKS ON} 23 | {$WRITEABLECONST ON} 24 | {$MINENUMSIZE 1} 25 | {$IMAGEBASE $400000} 26 | {$DEFINE USE_THEMES} 27 | {$DEFINE DEBUG} 28 | {$ENDIF IMPLICITBUILDING} 29 | {$DESCRIPTION 'KControls Development Suite - runtime package'} 30 | {$RUNONLY} 31 | {$IMPLICITBUILD ON} 32 | 33 | requires 34 | vcl, 35 | vclx, 36 | vclimg; 37 | 38 | contains 39 | kcontrols in '..\..\source\kcontrols.pas', 40 | keditcommon in '..\..\source\keditcommon.pas', 41 | kfunctions in '..\..\source\kfunctions.pas', 42 | kgraphics in '..\..\source\kgraphics.pas', 43 | khexeditor in '..\..\source\khexeditor.pas', 44 | kmemo in '..\..\source\kmemo.pas', 45 | kmemortf in '..\..\source\kmemortf.pas', 46 | kres in '..\..\source\kres.pas', 47 | kedits in '..\..\source\kedits.pas'; 48 | 49 | end. 50 | -------------------------------------------------------------------------------- /packages/kcontrols/KControls_RXE4.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/packages/kcontrols/KControls_RXE4.res -------------------------------------------------------------------------------- /packages/kcontrols/KControls_RXE5.dpk: -------------------------------------------------------------------------------- 1 | package KControls_RXE5; 2 | 3 | {$include ..\..\source\kcontrols.inc} 4 | 5 | {$R *.res} 6 | {$ALIGN 8} 7 | {$ASSERTIONS ON} 8 | {$BOOLEVAL OFF} 9 | {$DEBUGINFO ON} 10 | {$EXTENDEDSYNTAX ON} 11 | {$IMPORTEDDATA ON} 12 | {$IOCHECKS ON} 13 | {$LOCALSYMBOLS ON} 14 | {$LONGSTRINGS ON} 15 | {$OPENSTRINGS ON} 16 | {$OPTIMIZATION OFF} 17 | {$OVERFLOWCHECKS ON} 18 | {$RANGECHECKS ON} 19 | {$REFERENCEINFO ON} 20 | {$SAFEDIVIDE OFF} 21 | {$STACKFRAMES ON} 22 | {$TYPEDADDRESS ON} 23 | {$VARSTRINGCHECKS ON} 24 | {$WRITEABLECONST ON} 25 | {$MINENUMSIZE 1} 26 | {$IMAGEBASE $400000} 27 | {$DESCRIPTION 'KControls Development Suite - runtime package'} 28 | {$RUNONLY} 29 | {$IMPLICITBUILD ON} 30 | 31 | requires 32 | vcl, 33 | vclx, 34 | vclimg 35 | {$IFDEF TKDBGRID_USE} 36 | , dbrtl 37 | , vcldb 38 | {$ENDIF} 39 | ; 40 | 41 | contains 42 | kcontrols in '..\..\source\kcontrols.pas', 43 | kdialogs in '..\..\source\kdialogs.pas', 44 | keditcommon in '..\..\source\keditcommon.pas', 45 | kfunctions in '..\..\source\kfunctions.pas', 46 | kgraphics in '..\..\source\kgraphics.pas', 47 | kgrids in '..\..\source\kgrids.pas', 48 | kicon in '..\..\source\kicon.pas', 49 | khexeditor in '..\..\source\khexeditor.pas', 50 | kprintpreview in '..\..\source\kprintpreview.pas', 51 | kprintsetup in '..\..\source\kprintsetup.pas', 52 | kwidewinprocs in '..\..\source\kwidewinprocs.pas', 53 | kbuttons in '..\..\source\kbuttons.pas', 54 | kedits in '..\..\source\kedits.pas', 55 | klabels in '..\..\source\klabels.pas', 56 | kmemo in '..\..\source\kmemo.pas', 57 | kmessagebox in '..\..\source\kmessagebox.pas', 58 | klog in '..\..\source\klog.pas', 59 | kprogress in '..\..\source\kprogress.pas', 60 | kres in '..\..\source\kres.pas', 61 | kmemodlghyperlink in '..\..\source\kmemodlghyperlink.pas', 62 | kmemodlgnumbering in '..\..\source\kmemodlgnumbering.pas', 63 | kmemodlgparastyle in '..\..\source\kmemodlgparastyle.pas', 64 | kmemodlgtextstyle in '..\..\source\kmemodlgtextstyle.pas', 65 | kpagecontrol in '..\..\source\kpagecontrol.pas' 66 | {$IFDEF TKDBGRID_USE} 67 | , kdbgrids in '..\..\source\kdbgrids.pas' 68 | {$ENDIF} 69 | ; 70 | end. 71 | -------------------------------------------------------------------------------- /packages/kcontrols/KControls_RXE5.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/packages/kcontrols/KControls_RXE5.res -------------------------------------------------------------------------------- /packages/kcontrols/KControls_RXE6.dpk: -------------------------------------------------------------------------------- 1 | package KControls_RXE6; 2 | 3 | {$include ..\..\source\kcontrols.inc} 4 | 5 | {$R *.res} 6 | {$ALIGN 8} 7 | {$ASSERTIONS ON} 8 | {$BOOLEVAL OFF} 9 | {$DEBUGINFO ON} 10 | {$EXTENDEDSYNTAX ON} 11 | {$IMPORTEDDATA ON} 12 | {$IOCHECKS ON} 13 | {$LOCALSYMBOLS ON} 14 | {$LONGSTRINGS ON} 15 | {$OPENSTRINGS ON} 16 | {$OPTIMIZATION ON} 17 | {$OVERFLOWCHECKS ON} 18 | {$RANGECHECKS ON} 19 | {$REFERENCEINFO ON} 20 | {$SAFEDIVIDE OFF} 21 | {$STACKFRAMES OFF} 22 | {$TYPEDADDRESS ON} 23 | {$VARSTRINGCHECKS ON} 24 | {$WRITEABLECONST ON} 25 | {$MINENUMSIZE 1} 26 | {$IMAGEBASE $400000} 27 | {$DESCRIPTION 'KControls Development Suite - runtime package'} 28 | {$RUNONLY} 29 | {$IMPLICITBUILD ON} 30 | 31 | requires 32 | vcl, 33 | vclx, 34 | vclimg 35 | {$IFDEF TKDBGRID_USE} 36 | , dbrtl 37 | , vcldb 38 | {$ENDIF} 39 | ; 40 | 41 | contains 42 | kcontrols in '..\..\source\kcontrols.pas', 43 | kdialogs in '..\..\source\kdialogs.pas', 44 | keditcommon in '..\..\source\keditcommon.pas', 45 | kfunctions in '..\..\source\kfunctions.pas', 46 | kgraphics in '..\..\source\kgraphics.pas', 47 | kgrids in '..\..\source\kgrids.pas', 48 | kicon in '..\..\source\kicon.pas', 49 | khexeditor in '..\..\source\khexeditor.pas', 50 | kprintpreview in '..\..\source\kprintpreview.pas', 51 | kprintsetup in '..\..\source\kprintsetup.pas', 52 | kwidewinprocs in '..\..\source\kwidewinprocs.pas', 53 | kbuttons in '..\..\source\kbuttons.pas', 54 | kedits in '..\..\source\kedits.pas', 55 | klabels in '..\..\source\klabels.pas', 56 | kmemo in '..\..\source\kmemo.pas', 57 | kmessagebox in '..\..\source\kmessagebox.pas', 58 | klog in '..\..\source\klog.pas', 59 | kprogress in '..\..\source\kprogress.pas', 60 | kres in '..\..\source\kres.pas', 61 | kmemodlghyperlink in '..\..\source\kmemodlghyperlink.pas', 62 | kmemodlgnumbering in '..\..\source\kmemodlgnumbering.pas', 63 | kmemodlgparastyle in '..\..\source\kmemodlgparastyle.pas', 64 | kmemodlgtextstyle in '..\..\source\kmemodlgtextstyle.pas', 65 | kpagecontrol in '..\..\source\kpagecontrol.pas' 66 | {$IFDEF TKDBGRID_USE} 67 | , kdbgrids in '..\..\source\kdbgrids.pas' 68 | {$ENDIF} 69 | ; 70 | end. 71 | -------------------------------------------------------------------------------- /packages/kcontrols/KControls_RXE6.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/packages/kcontrols/KControls_RXE6.res -------------------------------------------------------------------------------- /packages/kcontrols/KControls_RXE7.dpk: -------------------------------------------------------------------------------- 1 | package KControls_RXE7; 2 | 3 | {$include ..\..\source\kcontrols.inc} 4 | 5 | {$R *.res} 6 | {$ALIGN 8} 7 | {$ASSERTIONS ON} 8 | {$BOOLEVAL OFF} 9 | {$DEBUGINFO ON} 10 | {$EXTENDEDSYNTAX ON} 11 | {$IMPORTEDDATA ON} 12 | {$IOCHECKS ON} 13 | {$LOCALSYMBOLS ON} 14 | {$LONGSTRINGS ON} 15 | {$OPENSTRINGS ON} 16 | {$OPTIMIZATION ON} 17 | {$OVERFLOWCHECKS ON} 18 | {$RANGECHECKS ON} 19 | {$REFERENCEINFO ON} 20 | {$SAFEDIVIDE OFF} 21 | {$STACKFRAMES OFF} 22 | {$TYPEDADDRESS ON} 23 | {$VARSTRINGCHECKS ON} 24 | {$WRITEABLECONST ON} 25 | {$MINENUMSIZE 1} 26 | {$IMAGEBASE $400000} 27 | {$DESCRIPTION 'KControls Development Suite - runtime package'} 28 | {$RUNONLY} 29 | {$IMPLICITBUILD ON} 30 | 31 | requires 32 | vcl, 33 | vclx, 34 | vclimg 35 | {$IFDEF TKDBGRID_USE} 36 | , dbrtl 37 | , vcldb 38 | {$ENDIF} 39 | ; 40 | 41 | contains 42 | kcontrols in '..\..\source\kcontrols.pas', 43 | kdialogs in '..\..\source\kdialogs.pas', 44 | keditcommon in '..\..\source\keditcommon.pas', 45 | kfunctions in '..\..\source\kfunctions.pas', 46 | kgraphics in '..\..\source\kgraphics.pas', 47 | kgrids in '..\..\source\kgrids.pas', 48 | kicon in '..\..\source\kicon.pas', 49 | khexeditor in '..\..\source\khexeditor.pas', 50 | kprintpreview in '..\..\source\kprintpreview.pas', 51 | kprintsetup in '..\..\source\kprintsetup.pas', 52 | kwidewinprocs in '..\..\source\kwidewinprocs.pas', 53 | kbuttons in '..\..\source\kbuttons.pas', 54 | kedits in '..\..\source\kedits.pas', 55 | klabels in '..\..\source\klabels.pas', 56 | kmemo in '..\..\source\kmemo.pas', 57 | kmessagebox in '..\..\source\kmessagebox.pas', 58 | klog in '..\..\source\klog.pas', 59 | kprogress in '..\..\source\kprogress.pas', 60 | kres in '..\..\source\kres.pas', 61 | kmemodlghyperlink in '..\..\source\kmemodlghyperlink.pas', 62 | kmemodlgnumbering in '..\..\source\kmemodlgnumbering.pas', 63 | kmemodlgparastyle in '..\..\source\kmemodlgparastyle.pas', 64 | kmemodlgtextstyle in '..\..\source\kmemodlgtextstyle.pas', 65 | kpagecontrol in '..\..\source\kpagecontrol.pas' 66 | {$IFDEF TKDBGRID_USE} 67 | , kdbgrids in '..\..\source\kdbgrids.pas' 68 | {$ENDIF} 69 | ; 70 | end. 71 | -------------------------------------------------------------------------------- /packages/kcontrols/KControls_RXE8.dpk: -------------------------------------------------------------------------------- 1 | package KControls_RXE8; 2 | 3 | {$include ..\..\source\kcontrols.inc} 4 | 5 | {$R *.res} 6 | {$ALIGN 8} 7 | {$ASSERTIONS ON} 8 | {$BOOLEVAL OFF} 9 | {$DEBUGINFO ON} 10 | {$EXTENDEDSYNTAX ON} 11 | {$IMPORTEDDATA ON} 12 | {$IOCHECKS ON} 13 | {$LOCALSYMBOLS ON} 14 | {$LONGSTRINGS ON} 15 | {$OPENSTRINGS ON} 16 | {$OPTIMIZATION ON} 17 | {$OVERFLOWCHECKS ON} 18 | {$RANGECHECKS ON} 19 | {$REFERENCEINFO ON} 20 | {$SAFEDIVIDE OFF} 21 | {$STACKFRAMES OFF} 22 | {$TYPEDADDRESS ON} 23 | {$VARSTRINGCHECKS ON} 24 | {$WRITEABLECONST ON} 25 | {$MINENUMSIZE 1} 26 | {$IMAGEBASE $400000} 27 | {$DESCRIPTION 'KControls Development Suite - runtime package'} 28 | {$RUNONLY} 29 | {$IMPLICITBUILD ON} 30 | 31 | requires 32 | vcl, 33 | vclx, 34 | vclimg 35 | {$IFDEF TKDBGRID_USE} 36 | , dbrtl 37 | , vcldb 38 | {$ENDIF} 39 | ; 40 | 41 | contains 42 | kcontrols in '..\..\source\kcontrols.pas', 43 | kdialogs in '..\..\source\kdialogs.pas', 44 | keditcommon in '..\..\source\keditcommon.pas', 45 | kfunctions in '..\..\source\kfunctions.pas', 46 | kgraphics in '..\..\source\kgraphics.pas', 47 | kgrids in '..\..\source\kgrids.pas', 48 | kicon in '..\..\source\kicon.pas', 49 | khexeditor in '..\..\source\khexeditor.pas', 50 | kprintpreview in '..\..\source\kprintpreview.pas', 51 | kprintsetup in '..\..\source\kprintsetup.pas', 52 | kwidewinprocs in '..\..\source\kwidewinprocs.pas', 53 | kbuttons in '..\..\source\kbuttons.pas', 54 | kedits in '..\..\source\kedits.pas', 55 | klabels in '..\..\source\klabels.pas', 56 | kmemo in '..\..\source\kmemo.pas', 57 | kmessagebox in '..\..\source\kmessagebox.pas', 58 | klog in '..\..\source\klog.pas', 59 | kprogress in '..\..\source\kprogress.pas', 60 | kres in '..\..\source\kres.pas', 61 | kmemodlghyperlink in '..\..\source\kmemodlghyperlink.pas', 62 | kmemodlgnumbering in '..\..\source\kmemodlgnumbering.pas', 63 | kmemodlgparastyle in '..\..\source\kmemodlgparastyle.pas', 64 | kmemodlgtextstyle in '..\..\source\kmemodlgtextstyle.pas', 65 | kpagecontrol in '..\..\source\kpagecontrol.pas' 66 | {$IFDEF TKDBGRID_USE} 67 | , kdbgrids in '..\..\source\kdbgrids.pas' 68 | {$ENDIF} 69 | ; 70 | end. 71 | -------------------------------------------------------------------------------- /packages/kcontrols/KControls_RXE8.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/packages/kcontrols/KControls_RXE8.res -------------------------------------------------------------------------------- /packages/kcontrols/KControls_XE4.groupproj: -------------------------------------------------------------------------------- 1 | <Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003"> 2 | <PropertyGroup> 3 | <ProjectGuid>{21D3C056-B1F9-42F6-8187-C3586BABA4AC}</ProjectGuid> 4 | </PropertyGroup> 5 | <ItemGroup> 6 | <Projects Include="KControls_DXE4.dproj"> 7 | <Dependencies/> 8 | </Projects> 9 | <Projects Include="KControls_RXE4.dproj"> 10 | <Dependencies/> 11 | </Projects> 12 | </ItemGroup> 13 | <ProjectExtensions> 14 | <Borland.Personality>Default.Personality.12</Borland.Personality> 15 | <Borland.ProjectType/> 16 | <BorlandProject> 17 | <Default.Personality/> 18 | </BorlandProject> 19 | </ProjectExtensions> 20 | <Target Name="KControls_DXE4"> 21 | <MSBuild Projects="KControls_DXE4.dproj"/> 22 | </Target> 23 | <Target Name="KControls_DXE4:Clean"> 24 | <MSBuild Projects="KControls_DXE4.dproj" Targets="Clean"/> 25 | </Target> 26 | <Target Name="KControls_DXE4:Make"> 27 | <MSBuild Projects="KControls_DXE4.dproj" Targets="Make"/> 28 | </Target> 29 | <Target Name="KControls_RXE4"> 30 | <MSBuild Projects="KControls_RXE4.dproj"/> 31 | </Target> 32 | <Target Name="KControls_RXE4:Clean"> 33 | <MSBuild Projects="KControls_RXE4.dproj" Targets="Clean"/> 34 | </Target> 35 | <Target Name="KControls_RXE4:Make"> 36 | <MSBuild Projects="KControls_RXE4.dproj" Targets="Make"/> 37 | </Target> 38 | <Target Name="Build"> 39 | <CallTarget Targets="KControls_DXE4;KControls_RXE4"/> 40 | </Target> 41 | <Target Name="Clean"> 42 | <CallTarget Targets="KControls_DXE4:Clean;KControls_RXE4:Clean"/> 43 | </Target> 44 | <Target Name="Make"> 45 | <CallTarget Targets="KControls_DXE4:Make;KControls_RXE4:Make"/> 46 | </Target> 47 | <Import Project="$(BDS)\Bin\CodeGear.Group.Targets" Condition="Exists('$(BDS)\Bin\CodeGear.Group.Targets')"/> 48 | </Project> 49 | -------------------------------------------------------------------------------- /packages/kcontrols/kcontrols.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/packages/kcontrols/kcontrols.res -------------------------------------------------------------------------------- /packages/kcontrols/kcontrolsdesign.pas: -------------------------------------------------------------------------------- 1 | unit kcontrolsdesign; 2 | 3 | {$include ..\..\source\kcontrols.inc} 4 | 5 | interface 6 | 7 | uses 8 | {$IFDEF FPC} 9 | ComponentEditors, PropEdits, 10 | {$ELSE} 11 | DesignIntf, DesignEditors, 12 | {$IFDEF COMPILER15_UP} 13 | Actions, 14 | {$ENDIF} 15 | {$ENDIF} 16 | KPictureEditor 17 | ; 18 | 19 | type 20 | TKOpenDialogEditor = class(TClassProperty) 21 | function GetAttributes: TPropertyAttributes; override; 22 | end; 23 | 24 | TKFileNameEditor = class(TStringProperty) 25 | function GetAttributes: TPropertyAttributes; override; 26 | procedure Edit; override; 27 | end; 28 | 29 | TKFolderEditor = class(TStringProperty) 30 | function GetAttributes: TPropertyAttributes; override; 31 | procedure Edit; override; 32 | end; 33 | 34 | { TKGraphicEditor } 35 | 36 | TKGraphicEditor = class(TClassProperty) 37 | function GetAttributes: TPropertyAttributes; override; 38 | procedure Edit; override; 39 | end; 40 | 41 | procedure Register; 42 | 43 | implementation 44 | 45 | {$IFNDEF FPC} 46 | {$R *.dcr} 47 | {$ENDIF} 48 | 49 | uses 50 | Classes, Dialogs, Controls, SysUtils, Forms, Graphics, ActnList, 51 | KGraphics, KControls, KButtons, KDialogs, KGrids, KHexEditor, 52 | KEdits, KLabels, KLog, KMemo, KMemoFrm, KProgress, KSplitter, 53 | KPageControl, KRes 54 | {$IFDEF TKDBGRID_USE} 55 | , KDBGrids 56 | {$ENDIF} 57 | {$IFDEF FPC} 58 | , LResources 59 | {$ENDIF} 60 | ; 61 | 62 | procedure Register; 63 | begin 64 | RegisterComponents('TK', [ 65 | TKGrid, 66 | {$IFDEF TKDBGRID_USE} 67 | TKDBGrid, 68 | {$ENDIF} 69 | TKMemo, 70 | {$IFnDEF FPC} 71 | TKMemoFrame, 72 | {$ENDIF} 73 | TKHexEditor, 74 | TKBitBtn, 75 | TKColorButton, 76 | TKSpeedButton, 77 | TKNumberEdit, 78 | TKFileNameEdit, 79 | TKLog, 80 | TKPercentProgressBar, 81 | TKLinkLabel, 82 | TKGradientLabel, 83 | TKSplitter, 84 | TKPageControl, 85 | TKPrintPreview, 86 | TKPrintSetupDialog, 87 | TKPrintPreviewDialog, 88 | TKBrowseFolderDialog 89 | ]); 90 | 91 | // editors 92 | RegisterPropertyEditor(TypeInfo(TKFileNameEditDlgProperties), nil, '', TKOpenDialogEditor); 93 | RegisterPropertyEditor(TypeInfo(TFileName), nil, 'FileName', TKFileNameEditor); 94 | RegisterPropertyEditor(TypeInfo(TFolder), nil, '', TKFolderEditor); 95 | RegisterPropertyEditor(TypeInfo(TKAlphaBitmap), nil, '', TKGraphicEditor); 96 | 97 | // actions 98 | RegisterActions('KMemo', [TKMemoEditCopyAction, TKMemoEditCutAction, 99 | TKMemoEditPasteAction, TKMemoEditSelectAllAction], nil); 100 | 101 | // images 102 | {$IFDEF REGISTER_PICTURE_FORMATS} 103 | TPicture.RegisterFileFormat('BMA', 'KControls alpha bitmap', TKAlphaBitmap); 104 | {$ENDIF} 105 | end; 106 | 107 | { TKOpenDialogEditor } 108 | 109 | function TKOpenDialogEditor.GetAttributes: TPropertyAttributes; 110 | begin 111 | Result := [paMultiSelect, paSubProperties, paReadOnly]; 112 | end; 113 | 114 | { TFileNameEditor } 115 | 116 | function TKFileNameEditor.GetAttributes: TPropertyAttributes; 117 | begin 118 | Result := [paRevertable, paDialog]; 119 | end; 120 | 121 | procedure TKFileNameEditor.Edit; 122 | 123 | procedure DoOpenDlg; 124 | var 125 | OD: TOpenDialog; 126 | begin 127 | OD := TOpenDialog.Create(Application); 128 | try 129 | OD.Filter := sEDAllFiles; 130 | OD.FileName := GetValue; 131 | if OD.Execute then SetValue(OD.FileName); 132 | finally 133 | OD.Free; 134 | end; 135 | end; 136 | 137 | var 138 | BF: TKBrowseFolderDialog; 139 | P: TPersistent; 140 | begin 141 | inherited; 142 | P := GetComponent(0); 143 | if P is TKFileNameEdit then with TKFileNameEdit(P) do 144 | begin 145 | if foFolderOnly in Options then 146 | begin 147 | BF := TKBrowseFolderDialog.Create(Application); 148 | try 149 | BF.Position := poScreenCenter; 150 | BF.Folder := GetValue; 151 | if BF.Execute then SetValue(BF.Folder); 152 | finally 153 | BF.Free; 154 | end; 155 | end else 156 | DoOpenDlg; 157 | end else 158 | DoOpenDlg; 159 | end; 160 | 161 | { TKFolderEditor } 162 | 163 | function TKFolderEditor.GetAttributes: TPropertyAttributes; 164 | begin 165 | Result := [paRevertable, paDialog, paMultiSelect]; 166 | end; 167 | 168 | procedure TKFolderEditor.Edit; 169 | var 170 | BF: TKBrowseFolderDialog; 171 | begin 172 | inherited; 173 | BF := TKBrowseFolderDialog.Create(Application); 174 | try 175 | BF.Position := poScreenCenter; 176 | if BF.Execute then 177 | SetValue(BF.Folder); 178 | finally 179 | BF.Free; 180 | end; 181 | end; 182 | 183 | { TKGraphicEditor } 184 | 185 | function TKGraphicEditor.GetAttributes: TPropertyAttributes; 186 | begin 187 | Result := [paRevertable, paDialog]; 188 | end; 189 | 190 | procedure TKGraphicEditor.Edit; 191 | var 192 | PictureEditor: TKPictureEditForm; 193 | P: TObject; 194 | Graphic: TKGraphic; 195 | begin 196 | {$IFDEF FPC} 197 | P := GetObjectValue(TGraphic); 198 | {$ELSE} 199 | P := TObject(GetOrdValue); 200 | {$ENDIF} 201 | if P is TKGraphic then 202 | begin 203 | Graphic := TKGraphic(P); 204 | PictureEditor := TKPictureEditForm.Create(nil); 205 | try 206 | PictureEditor.IMMain.Picture.Graphic := Graphic; 207 | PictureEditor.ODMain.Filter := Format('%s (%s)|%1:s', [Graphic.Description, Graphic.FileFilter]); 208 | PictureEditor.SDMain.Filter := PictureEditor.ODMain.Filter; 209 | if PictureEditor.ShowModal = mrOk then 210 | {$IFDEF FPC} 211 | SetPtrValue(PictureEditor.IMMain.Picture.Graphic); 212 | {$ELSE} 213 | SetOrdValue(Integer(PictureEditor.IMMain.Picture.Graphic)); 214 | {$ENDIF} 215 | finally 216 | PictureEditor.Free; 217 | end; 218 | end else 219 | raise Exception.CreateRes(@SInvalidGraphicFormat); 220 | end; 221 | 222 | {$IFDEF FPC} 223 | initialization 224 | {$i kcontrolsdesign.lrs} 225 | {$ENDIF} 226 | 227 | end. 228 | -------------------------------------------------------------------------------- /packages/kcontrols/kgrids.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/packages/kcontrols/kgrids.res -------------------------------------------------------------------------------- /packages/kcontrols/kmessagebox.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/packages/kcontrols/kmessagebox.res -------------------------------------------------------------------------------- /packages/kcontrols/kpictureeditor.dfm: -------------------------------------------------------------------------------- 1 | object KPictureEditForm: TKPictureEditForm 2 | Left = 0 3 | Top = 0 4 | BorderStyle = bsDialog 5 | Caption = 'KControls picture editor' 6 | ClientHeight = 247 7 | ClientWidth = 376 8 | Color = clBtnFace 9 | Font.Charset = DEFAULT_CHARSET 10 | Font.Color = clWindowText 11 | Font.Height = -11 12 | Font.Name = 'Tahoma' 13 | Font.Style = [] 14 | OldCreateOrder = True 15 | Position = poScreenCenter 16 | PixelsPerInch = 96 17 | TextHeight = 13 18 | object BULoad: TButton 19 | Left = 248 20 | Top = 16 21 | Width = 97 22 | Height = 25 23 | Caption = 'Load...' 24 | TabOrder = 0 25 | OnClick = BULoadClick 26 | end 27 | object BUSave: TButton 28 | Left = 248 29 | Top = 47 30 | Width = 97 31 | Height = 25 32 | Caption = 'Save...' 33 | TabOrder = 1 34 | OnClick = BUSaveClick 35 | end 36 | object BUOK: TButton 37 | Left = 248 38 | Top = 169 39 | Width = 97 40 | Height = 25 41 | Caption = 'OK' 42 | Default = True 43 | ModalResult = 1 44 | TabOrder = 2 45 | end 46 | object BUCancel: TButton 47 | Left = 248 48 | Top = 200 49 | Width = 97 50 | Height = 25 51 | Cancel = True 52 | Caption = 'Cancel' 53 | ModalResult = 2 54 | TabOrder = 3 55 | end 56 | object PNMain: TPanel 57 | Left = 8 58 | Top = 16 59 | Width = 225 60 | Height = 209 61 | BevelOuter = bvNone 62 | BorderStyle = bsSingle 63 | TabOrder = 4 64 | object IMMain: TImage 65 | Left = 0 66 | Top = 0 67 | Width = 221 68 | Height = 205 69 | Align = alClient 70 | Center = True 71 | Proportional = True 72 | end 73 | end 74 | object CBStretch: TCheckBox 75 | Left = 248 76 | Top = 136 77 | Width = 55 78 | Height = 19 79 | Caption = 'Stretch' 80 | TabOrder = 5 81 | OnClick = CBStretchClick 82 | end 83 | object BUClear: TButton 84 | Left = 248 85 | Top = 78 86 | Width = 97 87 | Height = 25 88 | Caption = 'Clear' 89 | TabOrder = 6 90 | OnClick = BUClearClick 91 | end 92 | object ODMain: TOpenDialog 93 | Options = [ofHideReadOnly, ofPathMustExist, ofFileMustExist, ofEnableSizing] 94 | Left = 256 95 | Top = 128 96 | end 97 | object SDMain: TSaveDialog 98 | Options = [ofHideReadOnly, ofPathMustExist, ofEnableSizing] 99 | Left = 296 100 | Top = 128 101 | end 102 | end 103 | -------------------------------------------------------------------------------- /packages/kcontrols/kpictureeditor.pas: -------------------------------------------------------------------------------- 1 | unit kpictureeditor; 2 | 3 | interface 4 | 5 | uses 6 | SysUtils, Variants, Classes, Graphics, Controls, Forms, 7 | Dialogs, ExtCtrls, StdCtrls; 8 | 9 | type 10 | TKPictureEditForm = class(TForm) 11 | BULoad: TButton; 12 | BUSave: TButton; 13 | BUOK: TButton; 14 | ODMain: TOpenDialog; 15 | SDMain: TSaveDialog; 16 | BUCancel: TButton; 17 | PNMain: TPanel; 18 | IMMain: TImage; 19 | CBStretch: TCheckBox; 20 | BUClear: TButton; 21 | procedure BULoadClick(Sender: TObject); 22 | procedure BUSaveClick(Sender: TObject); 23 | procedure CBStretchClick(Sender: TObject); 24 | procedure BUClearClick(Sender: TObject); 25 | private 26 | { Private declarations } 27 | public 28 | { Public declarations } 29 | end; 30 | 31 | implementation 32 | 33 | {$R *.dfm} 34 | 35 | procedure TKPictureEditForm.BUClearClick(Sender: TObject); 36 | begin 37 | IMMain.Picture.Graphic := nil; 38 | end; 39 | 40 | procedure TKPictureEditForm.BULoadClick(Sender: TObject); 41 | begin 42 | if ODMain.Execute then 43 | IMMain.Picture.LoadFromFile(ODMain.FileName); 44 | end; 45 | 46 | procedure TKPictureEditForm.BUSaveClick(Sender: TObject); 47 | begin 48 | if SDMain.Execute then 49 | IMMain.Picture.SaveToFile(SDMain.FileName); 50 | end; 51 | 52 | procedure TKPictureEditForm.CBStretchClick(Sender: TObject); 53 | begin 54 | IMMain.Stretch := CBStretch.Checked; 55 | end; 56 | 57 | end. -------------------------------------------------------------------------------- /resource_src/clouds.jpg: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/resource_src/clouds.jpg -------------------------------------------------------------------------------- /resource_src/kmessagebox_info.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/resource_src/kmessagebox_info.png -------------------------------------------------------------------------------- /resource_src/kmessagebox_question.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/resource_src/kmessagebox_question.png -------------------------------------------------------------------------------- /resource_src/kmessagebox_stop.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/resource_src/kmessagebox_stop.png -------------------------------------------------------------------------------- /resource_src/kmessagebox_warning.png: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/resource_src/kmessagebox_warning.png -------------------------------------------------------------------------------- /source/kbuttons.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/source/kbuttons.pas -------------------------------------------------------------------------------- /source/kcontrols.lrs: -------------------------------------------------------------------------------- 1 | LazarusResources.Add('kpreview_cursor_hand_free','CUR',[ 2 | #0#0#2#0#1#0' '#0#0#15#0#15#0'0'#1#0#0#22#0#0#0'('#0#0#0' '#0#0#0'@'#0#0#0#1 3 | +#0#1#0#0#0#0#0#128#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#255#255#255 4 | +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#3#240#0 5 | +#0#3#240#0#0#7#240#0#0#15#248#0#0#31#248#0#0#31#252#0#0'?'#252#0#0'w'#252#0#0 6 | +'g'#254#0#0#7#246#0#0#13#182#0#0#13#178#0#0#25#176#0#0#25#176#0#0#1#128#0#0#0 7 | +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#255#255 8 | +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 9 | +#255#255#255#255#255#255#255#255#255#255#255#255#248#7#255#255#248#7#255#255 10 | +#240#7#255#255#224#3#255#255#192#3#255#255#192#1#255#255#128#1#255#255#0#1 11 | +#255#255#0#0#255#255#144#0#255#255#224#0#255#255#224#0#255#255#192#5#255#255 12 | +#192#7#255#255#228#15#255#255#254#127#255#255#255#255#255#255#255#255#255#255 13 | +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 14 | +#255#255#255#255 15 | ]); 16 | LazarusResources.Add('kpreview_cursor_hand_grip','CUR',[ 17 | #0#0#2#0#1#0' '#0#0#15#0#15#0'0'#1#0#0#22#0#0#0'('#0#0#0' '#0#0#0'@'#0#0#0#1 18 | +#0#1#0#0#0#0#0#128#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#255#255#255 19 | +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0 20 | +#0#0#0#0#0#0#0#0#7#224#0#0#7#224#0#0#15#224#0#0#31#240#0#0'?'#240#0#0'?'#248 21 | +#0#0#15#248#0#0#15#248#0#0#31#232#0#0#27'`'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0 22 | +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#255#255#255#255#255 23 | +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 24 | +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 25 | +#255#255#240#15#255#255#240#15#255#255#224#15#255#255#192#7#255#255#128#7#255 26 | +#255#128#3#255#255#192#3#255#255#224#3#255#255#192#3#255#255#192#7#255#255 27 | +#228#159#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 28 | +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 29 | +#255#255#255#255#255 30 | ]); 31 | -------------------------------------------------------------------------------- /source/kcontrols.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/source/kcontrols.pas -------------------------------------------------------------------------------- /source/kcontrols.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/source/kcontrols.res -------------------------------------------------------------------------------- /source/kdbgrids.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/source/kdbgrids.pas -------------------------------------------------------------------------------- /source/kdialogs.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/source/kdialogs.pas -------------------------------------------------------------------------------- /source/keditcommon.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/source/keditcommon.pas -------------------------------------------------------------------------------- /source/kedits.lrs: -------------------------------------------------------------------------------- 1 | LazarusResources.Add('opendir','BMP',[ 2 | 'BM8'#3#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#16#0#0#0#16#0#0#0#1#0#24#0#0#0#0#0#2#3#0 3 | +#0#195#14#0#0#195#14#0#0#0#0#0#0#0#0#0#0#255#255#255#255#255#255#255#255#255 4 | +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 5 | +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 6 | +#255#255#255#255'r'#138#143'p'#136#140'n'#133#138'n'#133#138'n'#133#138'n' 7 | +#133#138'n'#133#138'n'#133#138'n'#133#138'o'#135#139'}'#152#157#149#180#186 8 | +#255#255#255#255#255#255#255#255#255')'#173#214')'#173#214')'#173#214')'#173 9 | +#214')'#173#214')'#173#214')'#173#214')'#173#214')'#173#214')'#173#214'8'#160 10 | +#193'X'#145#160'~'#153#158#255#255#255#255#255#255#255#255#255')'#173#214')' 11 | +#173#214'`'#234#254#142#240#254#149#241#254#154#241#254#156#242#254#154#241 12 | +#254#149#241#254#142#240#254#131#238#254'7'#160#192'o'#134#138#147#178#184 13 | +#255#255#255#255#255#255')'#173#214')'#173#214'`'#234#254#134#239#254#142#240 14 | +#254#146#240#254#148#241#254#146#240#254#142#240#254#134#239#254'|'#238#254 15 | +')'#173#214'W'#143#158'}'#151#156#255#255#255#255#255#255')'#173#214'h'#235 16 | +#254')'#173#214'`'#234#254#129#238#254#134#239#254#135#239#254#134#239#254 17 | +#129#238#254'{'#237#254'r'#236#254'h'#235#254'7'#160#192'o'#134#138#146#176 18 | +#182#255#255#255')'#173#214'['#233#254')'#173#214'`'#234#254'q'#236#254'u' 19 | +#237#254'v'#237#254'u'#237#254'q'#236#254'k'#235#254'd'#234#254'['#233#254')' 20 | +#173#214'X'#145#160'}'#152#157#255#255#255')'#173#214'K'#231#254'R'#232#254 21 | +')'#173#214'`'#234#254'`'#234#254'a'#234#254'`'#234#254']'#234#254'Y'#233#254 22 | +'R'#232#254'K'#231#254'K'#231#254':'#164#196'u'#141#146#150#181#187')'#173 23 | +#214'`'#233#253'e'#234#253')'#173#214')'#173#214')'#173#214')'#173#214')'#173 24 | +#214')'#173#214')'#173#214')'#173#214')'#173#214')'#173#214')'#173#214'~'#191 25 | +#208#255#255#255')'#173#214#127#237#253#129#238#254#131#238#253#133#238#253 26 | +#133#238#254#134#238#253#133#238#254#133#238#253#131#238#253')'#173#214'u' 27 | +#142#147#162#196#202#255#255#255#255#255#255#255#255#255')'#173#214#164#242 28 | +#253#165#242#254#166#242#253#167#243#254#167#243#254')'#173#214')'#173#214')' 29 | +#173#214')'#173#214')'#173#214#164#198#205#255#255#255#255#255#255#255#255 30 | +#255#255#255#255#255#255#255')'#173#214#208#248#254#208#248#254#208#248#254 31 | +')'#173#214#161#195#201#255#255#255#255#255#255#255#255#255#255#255#255#255 32 | +#255#255#255#255#255'x'#145#150't'#140#145'o'#135#139#255#255#255#255#255#255 33 | +')'#173#214')'#173#214')'#173#214#164#199#206#255#255#255#255#255#255#255#255 34 | +#255'}'#151#156#255#255#255#255#255#255#0#162#0#0#163#0#0#158#0'n'#133#138 35 | +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 36 | +#255#255#255#255#255#0#127#0#255#255#255'{'#149#154'z'#148#153'y'#147#152#0 37 | +#167#0#0#162#0'q'#136#141#255#255#255#255#255#255#255#255#255#255#255#255#255 38 | +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#0#139#0#0#149#0#0 39 | +#161#0#0#164#0#255#255#255#0#161#0#255#255#255#255#255#255#255#255#255#255 40 | +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 41 | +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255 42 | +#255#255#255#0#0 43 | ]); 44 | -------------------------------------------------------------------------------- /source/kedits.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/source/kedits.pas -------------------------------------------------------------------------------- /source/kedits.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/source/kedits.res -------------------------------------------------------------------------------- /source/kfunctions.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/source/kfunctions.pas -------------------------------------------------------------------------------- /source/kgraphics.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/source/kgraphics.pas -------------------------------------------------------------------------------- /source/kgrids.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/source/kgrids.pas -------------------------------------------------------------------------------- /source/kgrids.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/source/kgrids.res -------------------------------------------------------------------------------- /source/khexeditor.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/source/khexeditor.pas -------------------------------------------------------------------------------- /source/kicon.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/source/kicon.pas -------------------------------------------------------------------------------- /source/klabels.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/source/klabels.pas -------------------------------------------------------------------------------- /source/klog.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/source/klog.pas -------------------------------------------------------------------------------- /source/kmemo.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/source/kmemo.pas -------------------------------------------------------------------------------- /source/kmemodlghyperlink.dfm: -------------------------------------------------------------------------------- 1 | object KMemoHyperlinkForm: TKMemoHyperlinkForm 2 | Left = 0 3 | Top = 0 4 | BorderStyle = bsDialog 5 | Caption = 'Insert/edit hyperlink' 6 | ClientHeight = 135 7 | ClientWidth = 524 8 | Color = clBtnFace 9 | Font.Charset = DEFAULT_CHARSET 10 | Font.Color = clWindowText 11 | Font.Height = -11 12 | Font.Name = 'Tahoma' 13 | Font.Style = [] 14 | OldCreateOrder = False 15 | Position = poScreenCenter 16 | DesignSize = ( 17 | 524 18 | 135) 19 | PixelsPerInch = 96 20 | TextHeight = 13 21 | object LBText: TLabel 22 | Left = 24 23 | Top = 16 24 | Width = 73 25 | Height = 13 26 | Caption = 'Displayed text:' 27 | end 28 | object LBHyperlink: TLabel 29 | Left = 24 30 | Top = 56 31 | Width = 23 32 | Height = 13 33 | Caption = 'URL:' 34 | end 35 | object BUOk: TButton 36 | Left = 341 37 | Top = 95 38 | Width = 75 39 | Height = 25 40 | Caption = 'OK' 41 | Default = True 42 | ModalResult = 1 43 | TabOrder = 0 44 | end 45 | object BUCancel: TButton 46 | Left = 422 47 | Top = 95 48 | Width = 75 49 | Height = 25 50 | Cancel = True 51 | Caption = 'Cancel' 52 | ModalResult = 2 53 | TabOrder = 1 54 | end 55 | object EDText: TEdit 56 | Left = 127 57 | Top = 13 58 | Width = 370 59 | Height = 21 60 | Anchors = [akLeft, akTop, akRight] 61 | TabOrder = 2 62 | end 63 | object CoBURL: TComboBox 64 | Left = 127 65 | Top = 53 66 | Width = 370 67 | Height = 21 68 | TabOrder = 3 69 | end 70 | end 71 | -------------------------------------------------------------------------------- /source/kmemodlghyperlink.lfm: -------------------------------------------------------------------------------- 1 | object KMemoHyperlinkForm: TKMemoHyperlinkForm 2 | Left = 484 3 | Height = 135 4 | Top = 182 5 | Width = 524 6 | BorderStyle = bsDialog 7 | Caption = 'Insert/edit hyperlink' 8 | ClientHeight = 135 9 | ClientWidth = 524 10 | Color = clBtnFace 11 | Font.Color = clWindowText 12 | Font.Height = -11 13 | Font.Name = 'Tahoma' 14 | Position = poScreenCenter 15 | LCLVersion = '1.2.4.0' 16 | object LBText: TLabel 17 | Left = 24 18 | Height = 13 19 | Top = 16 20 | Width = 73 21 | Caption = 'Displayed text:' 22 | ParentColor = False 23 | end 24 | object LBHyperlink: TLabel 25 | Left = 24 26 | Height = 13 27 | Top = 56 28 | Width = 23 29 | Caption = 'URL:' 30 | ParentColor = False 31 | end 32 | object BUOk: TButton 33 | Left = 341 34 | Height = 25 35 | Top = 95 36 | Width = 75 37 | Caption = 'OK' 38 | Default = True 39 | ModalResult = 1 40 | TabOrder = 0 41 | end 42 | object BUCancel: TButton 43 | Left = 422 44 | Height = 25 45 | Top = 95 46 | Width = 75 47 | Cancel = True 48 | Caption = 'Cancel' 49 | ModalResult = 2 50 | TabOrder = 1 51 | end 52 | object EDText: TEdit 53 | Left = 127 54 | Height = 21 55 | Top = 13 56 | Width = 370 57 | Anchors = [akTop, akLeft, akRight] 58 | TabOrder = 2 59 | end 60 | object CoBURL: TComboBox 61 | Left = 127 62 | Height = 21 63 | Top = 53 64 | Width = 370 65 | ItemHeight = 13 66 | TabOrder = 3 67 | end 68 | end 69 | -------------------------------------------------------------------------------- /source/kmemodlghyperlink.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/source/kmemodlghyperlink.pas -------------------------------------------------------------------------------- /source/kmemodlgnumbering.dfm: -------------------------------------------------------------------------------- 1 | object KMemoNumberingForm: TKMemoNumberingForm 2 | Left = 0 3 | Top = 0 4 | BorderStyle = bsDialog 5 | Caption = 'Bullets and numbering' 6 | ClientHeight = 402 7 | ClientWidth = 375 8 | Color = clBtnFace 9 | Font.Charset = DEFAULT_CHARSET 10 | Font.Color = clWindowText 11 | Font.Height = -11 12 | Font.Name = 'Tahoma' 13 | Font.Style = [] 14 | OldCreateOrder = False 15 | Position = poScreenCenter 16 | OnCreate = FormCreate 17 | OnDestroy = FormDestroy 18 | PixelsPerInch = 96 19 | TextHeight = 13 20 | object BUOk: TButton 21 | Left = 211 22 | Top = 367 23 | Width = 75 24 | Height = 25 25 | Caption = 'OK' 26 | Default = True 27 | ModalResult = 1 28 | TabOrder = 0 29 | end 30 | object BUCancel: TButton 31 | Left = 292 32 | Top = 367 33 | Width = 75 34 | Height = 25 35 | Cancel = True 36 | Caption = 'Cancel' 37 | ModalResult = 2 38 | TabOrder = 1 39 | end 40 | object RGNumbering: TRadioGroup 41 | Left = 8 42 | Top = 8 43 | Width = 359 44 | Height = 161 45 | Caption = 'Numbering style' 46 | Columns = 2 47 | ItemIndex = 0 48 | Items.Strings = ( 49 | 'None' 50 | 'Bullets' 51 | 'Arabic (1,2,3)' 52 | 'Letter Lo (a,b,c)' 53 | 'Letter Hi (A,B,C)' 54 | 'Roman Lo (i,ii,iii)' 55 | 'Roman Hi (I,II,III)') 56 | TabOrder = 2 57 | OnClick = RGNumberingClick 58 | end 59 | object GBOptions: TGroupBox 60 | Left = 8 61 | Top = 175 62 | Width = 359 63 | Height = 98 64 | Caption = 'Options' 65 | TabOrder = 3 66 | object LBFirstIndent: TLabel 67 | Left = 10 68 | Top = 27 69 | Width = 58 70 | Height = 13 71 | Caption = 'First indent:' 72 | end 73 | object LBLeftIndent: TLabel 74 | Left = 10 75 | Top = 57 76 | Width = 56 77 | Height = 13 78 | Caption = 'Left indent:' 79 | end 80 | object LBListLevel: TLabel 81 | Left = 186 82 | Top = 57 83 | Width = 29 84 | Height = 13 85 | Caption = 'Level:' 86 | end 87 | object EDFirstIndent: TKNumberEdit 88 | Left = 90 89 | Top = 24 90 | Width = 55 91 | Height = 21 92 | CustomSuffix = 'pt' 93 | DecimalSeparator = ',' 94 | Max = 250.000000000000000000 95 | Min = -250.000000000000000000 96 | Options = [neoLowerCase, neoUsePrefix, neoUseUpDown, neoWarning] 97 | TabOrder = 0 98 | UpDownStep = 5.000000000000000000 99 | end 100 | object EDLeftIndent: TKNumberEdit 101 | Left = 90 102 | Top = 54 103 | Width = 55 104 | Height = 21 105 | CustomSuffix = 'pt' 106 | DecimalSeparator = ',' 107 | Max = 250.000000000000000000 108 | Min = -250.000000000000000000 109 | Options = [neoLowerCase, neoUsePrefix, neoUseUpDown, neoWarning] 110 | TabOrder = 2 111 | UpDownStep = 5.000000000000000000 112 | end 113 | object CoBListLevel: TComboBox 114 | Left = 245 115 | Top = 54 116 | Width = 100 117 | Height = 21 118 | Style = csDropDownList 119 | TabOrder = 4 120 | OnClick = CoBListLevelClick 121 | Items.Strings = ( 122 | 'first' 123 | 'second' 124 | 'third' 125 | 'fourth' 126 | 'fifth' 127 | 'sixth' 128 | 'seventh' 129 | 'eighth' 130 | 'ninth') 131 | end 132 | end 133 | object GBStartAt: TGroupBox 134 | Left = 8 135 | Top = 279 136 | Width = 359 137 | Height = 80 138 | Caption = 'Starting value' 139 | TabOrder = 4 140 | object RBContinuous: TRadioButton 141 | Left = 10 142 | Top = 24 143 | Width = 113 144 | Height = 17 145 | Caption = 'Continuous' 146 | TabOrder = 0 147 | OnClick = RBContinuousClick 148 | end 149 | object RBStartFromOne: TRadioButton 150 | Left = 10 151 | Top = 47 152 | Width = 113 153 | Height = 17 154 | Caption = 'Again start from 1' 155 | TabOrder = 1 156 | OnClick = RBContinuousClick 157 | end 158 | object RBStartAt: TRadioButton 159 | Left = 185 160 | Top = 24 161 | Width = 113 162 | Height = 17 163 | Caption = 'Set custom value:' 164 | TabOrder = 2 165 | OnClick = RBContinuousClick 166 | end 167 | object EDStartAt: TKNumberEdit 168 | Left = 184 169 | Top = 47 170 | Width = 55 171 | Height = 21 172 | DecimalSeparator = ',' 173 | Options = [neoLowerCase, neoUsePrefix, neoUseUpDown, neoWarning] 174 | TabOrder = 3 175 | Value = 1.000000000000000000 176 | end 177 | end 178 | end 179 | -------------------------------------------------------------------------------- /source/kmemodlgnumbering.lfm: -------------------------------------------------------------------------------- 1 | object KMemoNumberingForm: TKMemoNumberingForm 2 | Left = 0 3 | Height = 402 4 | Top = 0 5 | Width = 375 6 | BorderStyle = bsDialog 7 | Caption = 'Bullets and numbering' 8 | ClientHeight = 402 9 | ClientWidth = 375 10 | Color = clBtnFace 11 | Font.Color = clWindowText 12 | Font.Height = -11 13 | Font.Name = 'Tahoma' 14 | OnCreate = FormCreate 15 | OnDestroy = FormDestroy 16 | Position = poScreenCenter 17 | LCLVersion = '1.3' 18 | object BUOk: TButton 19 | Left = 211 20 | Height = 25 21 | Top = 367 22 | Width = 75 23 | Caption = 'OK' 24 | Default = True 25 | ModalResult = 1 26 | TabOrder = 0 27 | end 28 | object BUCancel: TButton 29 | Left = 292 30 | Height = 25 31 | Top = 367 32 | Width = 75 33 | Cancel = True 34 | Caption = 'Cancel' 35 | ModalResult = 2 36 | TabOrder = 1 37 | end 38 | object RGNumbering: TRadioGroup 39 | Left = 8 40 | Height = 161 41 | Top = 8 42 | Width = 359 43 | AutoFill = True 44 | Caption = 'Numbering style' 45 | ChildSizing.LeftRightSpacing = 6 46 | ChildSizing.EnlargeHorizontal = crsHomogenousChildResize 47 | ChildSizing.EnlargeVertical = crsHomogenousChildResize 48 | ChildSizing.ShrinkHorizontal = crsScaleChilds 49 | ChildSizing.ShrinkVertical = crsScaleChilds 50 | ChildSizing.Layout = cclLeftToRightThenTopToBottom 51 | ChildSizing.ControlsPerLine = 2 52 | ClientHeight = 131 53 | ClientWidth = 355 54 | Columns = 2 55 | ItemIndex = 0 56 | Items.Strings = ( 57 | 'None' 58 | 'Bullets' 59 | 'Arabic (1,2,3)' 60 | 'Letter Lo (a,b,c)' 61 | 'Letter Hi (A,B,C)' 62 | 'Roman Lo (i,ii,iii)' 63 | 'Roman Hi (I,II,III)' 64 | ) 65 | OnClick = RGNumberingClick 66 | TabOrder = 2 67 | end 68 | object GBOptions: TGroupBox 69 | Left = 8 70 | Height = 98 71 | Top = 175 72 | Width = 359 73 | Caption = 'Options' 74 | ClientHeight = 68 75 | ClientWidth = 355 76 | TabOrder = 3 77 | object LBFirstIndent: TLabel 78 | Left = 10 79 | Height = 14 80 | Top = 5 81 | Width = 67 82 | Caption = 'First indent:' 83 | ParentColor = False 84 | end 85 | object LBLeftIndent: TLabel 86 | Left = 10 87 | Height = 14 88 | Top = 35 89 | Width = 64 90 | Caption = 'Left indent:' 91 | ParentColor = False 92 | end 93 | object LBListLevel: TLabel 94 | Left = 186 95 | Height = 14 96 | Top = 35 97 | Width = 33 98 | Caption = 'Level:' 99 | ParentColor = False 100 | end 101 | object EDFirstIndent: TKNumberEdit 102 | Left = 90 103 | Height = 21 104 | Top = 2 105 | Width = 55 106 | CustomSuffix = 'pt' 107 | DecimalSeparator = ',' 108 | Font.Color = clWindowText 109 | Max = 250 110 | Min = -250 111 | Options = [neoLowerCase, neoUsePrefix, neoUseUpDown, neoWarning] 112 | ParentFont = False 113 | TabOrder = 0 114 | UpDownStep = 5 115 | end 116 | object EDLeftIndent: TKNumberEdit 117 | Left = 90 118 | Height = 21 119 | Top = 32 120 | Width = 55 121 | CustomSuffix = 'pt' 122 | DecimalSeparator = ',' 123 | Font.Color = clWindowText 124 | Max = 250 125 | Min = -250 126 | Options = [neoLowerCase, neoUsePrefix, neoUseUpDown, neoWarning] 127 | ParentFont = False 128 | TabOrder = 2 129 | UpDownStep = 5 130 | end 131 | object CoBListLevel: TComboBox 132 | Left = 245 133 | Height = 22 134 | Top = 32 135 | Width = 100 136 | ItemHeight = 0 137 | Items.Strings = ( 138 | 'first' 139 | 'second' 140 | 'third' 141 | 'fourth' 142 | 'fifth' 143 | 'sixth' 144 | 'seventh' 145 | 'eighth' 146 | 'ninth' 147 | ) 148 | OnClick = CoBListLevelClick 149 | Style = csDropDownList 150 | TabOrder = 4 151 | end 152 | end 153 | object GBStartAt: TGroupBox 154 | Left = 8 155 | Height = 80 156 | Top = 279 157 | Width = 359 158 | Caption = 'Starting value' 159 | ClientHeight = 50 160 | ClientWidth = 355 161 | TabOrder = 4 162 | object RBContinuous: TRadioButton 163 | Left = 10 164 | Height = 26 165 | Top = 1 166 | Width = 92 167 | Caption = 'Continuous' 168 | Checked = True 169 | OnClick = RBContinuousClick 170 | TabOrder = 0 171 | end 172 | object RBStartFromOne: TRadioButton 173 | Left = 10 174 | Height = 26 175 | Top = 24 176 | Width = 132 177 | Caption = 'Again start from 1' 178 | OnClick = RBContinuousClick 179 | TabOrder = 1 180 | end 181 | object RBStartAt: TRadioButton 182 | Left = 185 183 | Height = 26 184 | Top = 1 185 | Width = 131 186 | Caption = 'Set custom value:' 187 | OnClick = RBContinuousClick 188 | TabOrder = 2 189 | end 190 | object EDStartAt: TKNumberEdit 191 | Left = 184 192 | Height = 21 193 | Top = 24 194 | Width = 55 195 | DecimalSeparator = ',' 196 | Font.Color = clWindowText 197 | Options = [neoLowerCase, neoUsePrefix, neoUseUpDown, neoWarning] 198 | ParentFont = False 199 | TabOrder = 3 200 | Value = 1 201 | end 202 | end 203 | end -------------------------------------------------------------------------------- /source/kmemodlgnumbering.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/source/kmemodlgnumbering.pas -------------------------------------------------------------------------------- /source/kmemodlgparastyle.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/source/kmemodlgparastyle.pas -------------------------------------------------------------------------------- /source/kmemodlgtextstyle.dfm: -------------------------------------------------------------------------------- 1 | object KMemoTextStyleForm: TKMemoTextStyleForm 2 | Left = 0 3 | Top = 0 4 | BorderStyle = bsDialog 5 | Caption = 'Text style' 6 | ClientHeight = 473 7 | ClientWidth = 351 8 | Color = clBtnFace 9 | Font.Charset = DEFAULT_CHARSET 10 | Font.Color = clWindowText 11 | Font.Height = -11 12 | Font.Name = 'Tahoma' 13 | Font.Style = [] 14 | OldCreateOrder = False 15 | Position = poScreenCenter 16 | OnCreate = FormCreate 17 | PixelsPerInch = 96 18 | TextHeight = 13 19 | object BUOk: TButton 20 | Left = 181 21 | Top = 436 22 | Width = 75 23 | Height = 25 24 | Caption = 'OK' 25 | Default = True 26 | ModalResult = 1 27 | TabOrder = 0 28 | end 29 | object BUCancel: TButton 30 | Left = 262 31 | Top = 436 32 | Width = 75 33 | Height = 25 34 | Cancel = True 35 | Caption = 'Cancel' 36 | ModalResult = 2 37 | TabOrder = 1 38 | end 39 | object GBFont: TGroupBox 40 | Left = 8 41 | Top = 8 42 | Width = 329 43 | Height = 218 44 | Caption = 'Font' 45 | TabOrder = 2 46 | object LBFontName: TLabel 47 | Left = 18 48 | Top = 19 49 | Width = 55 50 | Height = 13 51 | Caption = 'Font name:' 52 | end 53 | object LBFontSize: TLabel 54 | Left = 236 55 | Top = 19 56 | Width = 47 57 | Height = 13 58 | Caption = 'Font size:' 59 | end 60 | object EDFont: TEdit 61 | Left = 18 62 | Top = 38 63 | Width = 208 64 | Height = 21 65 | TabOrder = 0 66 | Text = 'EDFont' 67 | OnChange = EDFontChange 68 | end 69 | object LiBFont: TListBox 70 | Left = 18 71 | Top = 60 72 | Width = 208 73 | Height = 141 74 | Style = lbOwnerDrawFixed 75 | ItemHeight = 20 76 | TabOrder = 1 77 | OnClick = LiBFontClick 78 | OnDrawItem = LiBFontDrawItem 79 | end 80 | object LiBFontSize: TListBox 81 | Left = 236 82 | Top = 60 83 | Width = 75 84 | Height = 141 85 | ItemHeight = 13 86 | TabOrder = 2 87 | OnClick = LiBFontSizeClick 88 | end 89 | object EDFontSize: TKNumberEdit 90 | Left = 236 91 | Top = 38 92 | Width = 59 93 | Height = 21 94 | CustomSuffix = 'pt' 95 | DecimalSeparator = ',' 96 | Max = 200.000000000000000000 97 | Min = 1.000000000000000000 98 | Options = [neoLowerCase, neoUsePrefix, neoUseUpDown, neoWarning] 99 | TabOrder = 3 100 | Value = 1.000000000000000000 101 | OnChange = EDFontSizeChange 102 | end 103 | end 104 | object GBStyle: TGroupBox 105 | Left = 8 106 | Top = 303 107 | Width = 329 108 | Height = 127 109 | Caption = 'Style' 110 | TabOrder = 3 111 | object CBBold: TCheckBox 112 | Left = 18 113 | Top = 24 114 | Width = 97 115 | Height = 17 116 | Caption = 'Bold' 117 | TabOrder = 0 118 | end 119 | object CBItalic: TCheckBox 120 | Left = 18 121 | Top = 47 122 | Width = 97 123 | Height = 17 124 | Caption = 'Italic' 125 | TabOrder = 1 126 | end 127 | object CBUnderline: TCheckBox 128 | Left = 18 129 | Top = 70 130 | Width = 97 131 | Height = 17 132 | Caption = 'Underlined' 133 | TabOrder = 2 134 | end 135 | object CBStrikeout: TCheckBox 136 | Left = 18 137 | Top = 93 138 | Width = 97 139 | Height = 17 140 | Caption = 'Strikeout' 141 | TabOrder = 3 142 | end 143 | object CBCaps: TCheckBox 144 | Left = 161 145 | Top = 24 146 | Width = 97 147 | Height = 17 148 | Caption = 'Capitals' 149 | TabOrder = 4 150 | OnClick = CBCapsClick 151 | end 152 | object CBSmallCaps: TCheckBox 153 | Left = 161 154 | Top = 47 155 | Width = 97 156 | Height = 17 157 | Caption = 'Small capitals' 158 | TabOrder = 5 159 | OnClick = CBSmallCapsClick 160 | end 161 | object CBSubscript: TCheckBox 162 | Left = 161 163 | Top = 70 164 | Width = 97 165 | Height = 17 166 | Caption = 'Subscript' 167 | TabOrder = 6 168 | OnClick = CBSubscriptClick 169 | end 170 | object CBSuperscript: TCheckBox 171 | Left = 161 172 | Top = 93 173 | Width = 97 174 | Height = 17 175 | Caption = 'Superscript' 176 | TabOrder = 7 177 | OnClick = CBSuperscriptClick 178 | end 179 | end 180 | object GBColors: TGroupBox 181 | Left = 8 182 | Top = 229 183 | Width = 329 184 | Height = 68 185 | Caption = 'Colors' 186 | TabOrder = 4 187 | object LBTextShading: TLabel 188 | Left = 161 189 | Top = 31 190 | Width = 42 191 | Height = 13 192 | Caption = 'Shading:' 193 | end 194 | object LBFontColor: TLabel 195 | Left = 18 196 | Top = 31 197 | Width = 52 198 | Height = 13 199 | Caption = 'Font color:' 200 | end 201 | object CLBTextShading: TKColorButton 202 | Left = 241 203 | Top = 26 204 | Width = 70 205 | Height = 25 206 | Font.Charset = DEFAULT_CHARSET 207 | Font.Color = clBtnText 208 | Font.Height = -11 209 | Font.Name = 'Tahoma' 210 | Font.Style = [] 211 | ParentFont = False 212 | TabOrder = 0 213 | ColorDlgOptions = [] 214 | end 215 | object CLBFontColor: TKColorButton 216 | Left = 82 217 | Top = 26 218 | Width = 70 219 | Height = 25 220 | Font.Charset = DEFAULT_CHARSET 221 | Font.Color = clBtnText 222 | Font.Height = -11 223 | Font.Name = 'Tahoma' 224 | Font.Style = [] 225 | ParentFont = False 226 | TabOrder = 1 227 | ColorDlgOptions = [] 228 | end 229 | end 230 | end 231 | -------------------------------------------------------------------------------- /source/kmemodlgtextstyle.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/source/kmemodlgtextstyle.pas -------------------------------------------------------------------------------- /source/kmemofrm.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/source/kmemofrm.pas -------------------------------------------------------------------------------- /source/kmemortf.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/source/kmemortf.pas -------------------------------------------------------------------------------- /source/kmessagebox.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/source/kmessagebox.pas -------------------------------------------------------------------------------- /source/kmessagebox.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/source/kmessagebox.res -------------------------------------------------------------------------------- /source/kpagecontrol.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/source/kpagecontrol.pas -------------------------------------------------------------------------------- /source/kprintpreview.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/source/kprintpreview.pas -------------------------------------------------------------------------------- /source/kprintsetup.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/source/kprintsetup.pas -------------------------------------------------------------------------------- /source/kprogress.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/source/kprogress.pas -------------------------------------------------------------------------------- /source/kres.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/source/kres.pas -------------------------------------------------------------------------------- /source/ksplitter.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/source/ksplitter.pas -------------------------------------------------------------------------------- /source/kwidewinprocs.pas: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/source/kwidewinprocs.pas -------------------------------------------------------------------------------- /source/xpman.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/ThomasJaeger/KControls/e8ac975f961b947c4f51c33dd87175b74128a917/source/xpman.res --------------------------------------------------------------------------------