babaev-an/lasarus_compotents
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Стартовый пул

Browse Source
This commit is contained in:
Александр Бабаев
2024-04-02 08:46:59 +03:00
parent fd57fffd3a
commit 3bb34d000b
5591 changed files with 3291734 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

270
RXLib/.svn/pristine/12/123276e97980016dac4f9dc0fd87ced89ddf563d.svn-base Normal file
View File

@@ -0,0 +1,270 @@
<?xml version="1.0" encoding="UTF-8"?>
<CONFIG>
<ProjectOptions>
<Version Value="9"/>
<PathDelim Value="\"/>
<General>
<Flags>
<LRSInOutputDirectory Value="False"/>
</Flags>
<MainUnit Value="0"/>
</General>
<BuildModes Count="1">
<Item1 Name="default" Default="True"/>
</BuildModes>
<PublishOptions>
<Version Value="2"/>
<IgnoreBinaries Value="False"/>
<IncludeFileFilter Value="*.(pas|pp|inc|lfm|lpr|lrs|lpi|lpk|sh|xml)"/>
<ExcludeFileFilter Value="*.(bak|ppu|ppw|o|so);*~;backup"/>
</PublishOptions>
<RunParams>
<local>
<FormatVersion Value="1"/>
<LaunchingApplication PathPlusParams="\usr\X11R6\bin\xterm -T 'Lazarus Run Output' -e $(LazarusDir)\tools\runwait.sh $(TargetCmdLine)"/>
</local>
</RunParams>
<RequiredPackages Count="3">
<Item1>
<PackageName Value="rxnew"/>
<MinVersion Major="1" Release="11" Build="35" Valid="True"/>
</Item1>
<Item2>
<PackageName Value="LCL"/>
</Item2>
<Item3>
<PackageName Value="FCL"/>
<MinVersion Major="1" Valid="True"/>
</Item3>
</RequiredPackages>
<Units Count="26">
<Unit0>
<Filename Value="project1.lpr"/>
<IsPartOfProject Value="True"/>
<UsageCount Value="26"/>
</Unit0>
<Unit1>
<Filename Value="unit1.pas"/>
<IsPartOfProject Value="True"/>
<ComponentName Value="Form1"/>
<HasResources Value="True"/>
<ResourceBaseClass Value="Form"/>
<UnitName Value="Unit1"/>
<IsVisibleTab Value="True"/>
<CursorPos X="34" Y="9"/>
<UsageCount Value="26"/>
<Loaded Value="True"/>
<LoadedDesigner Value="True"/>
</Unit1>
<Unit2>
<Filename Value="C:\lazarus\lcl\extctrls.pp"/>
<UnitName Value="ExtCtrls"/>
<TopLine Value="451"/>
<CursorPos X="83" Y="456"/>
<UsageCount Value="10"/>
</Unit2>
<Unit3>
<Filename Value="C:\lazarus\lcl\controls.pp"/>
<UnitName Value="Controls"/>
<TopLine Value="224"/>
<CursorPos X="26" Y="228"/>
<UsageCount Value="10"/>
</Unit3>
<Unit4>
<Filename Value="C:\lazarus\lcl\graphics.pp"/>
<UnitName Value="Graphics"/>
<TopLine Value="586"/>
<CursorPos X="102" Y="589"/>
<UsageCount Value="10"/>
</Unit4>
<Unit5>
<Filename Value="C:\lazarus\lcl\lclproc.pas"/>
<UnitName Value="LCLProc"/>
<TopLine Value="577"/>
<CursorPos X="70" Y="578"/>
<UsageCount Value="10"/>
</Unit5>
<Unit6>
<Filename Value="C:\lazarus\lcl\include\canvas.inc"/>
<TopLine Value="771"/>
<CursorPos X="58" Y="776"/>
<UsageCount Value="10"/>
</Unit6>
<Unit7>
<Filename Value="C:\lazarus\lcl\include\paintbox.inc"/>
<TopLine Value="16"/>
<CursorPos X="81" Y="18"/>
<UsageCount Value="10"/>
</Unit7>
<Unit8>
<Filename Value="C:\lazarus\lcl\include\graphiccontrol.inc"/>
<TopLine Value="21"/>
<CursorPos X="101" Y="26"/>
<UsageCount Value="10"/>
</Unit8>
<Unit9>
<Filename Value="C:\lazarus\lcl\include\controlcanvas.inc"/>
<TopLine Value="36"/>
<CursorPos X="59" Y="43"/>
<UsageCount Value="10"/>
</Unit9>
<Unit10>
<Filename Value="C:\lazarus\lcl\include\bitmap.inc"/>
<TopLine Value="138"/>
<CursorPos X="29" Y="141"/>
<UsageCount Value="10"/>
</Unit10>
<Unit11>
<Filename Value="C:\lazarus\fpcsrc\rtl\objpas\classes\classes.inc"/>
<TopLine Value="238"/>
<CursorPos X="69" Y="241"/>
<UsageCount Value="10"/>
</Unit11>
<Unit12>
<Filename Value="C:\lazarus\lcl\include\brush.inc"/>
<TopLine Value="178"/>
<CursorPos X="56" Y="181"/>
<UsageCount Value="10"/>
</Unit12>
<Unit13>
<Filename Value="C:\lazarus\lcl\include\winapi.inc"/>
<TopLine Value="226"/>
<CursorPos X="52" Y="228"/>
<UsageCount Value="10"/>
</Unit13>
<Unit14>
<Filename Value="C:\lazarus\lcl\interfaces\win32\win32winapi.inc"/>
<TopLine Value="1316"/>
<CursorPos X="67" Y="1319"/>
<UsageCount Value="10"/>
</Unit14>
<Unit15>
<Filename Value="C:\lazarus\fpcsrc\fcl\image\fpcanvas.pp"/>
<UnitName Value="FPCanvas"/>
<TopLine Value="117"/>
<CursorPos X="101" Y="117"/>
<UsageCount Value="10"/>
</Unit15>
<Unit16>
<Filename Value="C:\lazarus\components\lazreport\source\LR_BarC.pas"/>
<ComponentName Value="frBarCodeForm"/>
<HasResources Value="True"/>
<TopLine Value="400"/>
<CursorPos X="57" Y="405"/>
<UsageCount Value="10"/>
</Unit16>
<Unit17>
<Filename Value="C:\lazarus\components\lazreport\source\Barcode.pas"/>
<TopLine Value="149"/>
<CursorPos X="38" Y="150"/>
<UsageCount Value="10"/>
</Unit17>
<Unit18>
<Filename Value="C:\lazarus\components\lazreport\source\LR_Class.pas"/>
<TopLine Value="210"/>
<CursorPos Y="228"/>
<UsageCount Value="10"/>
</Unit18>
<Unit19>
<Filename Value="C:\lazarus\components\rxnew\rxdbgrid.pas"/>
<TopLine Value="931"/>
<CursorPos X="46" Y="954"/>
<UsageCount Value="11"/>
</Unit19>
<Unit20>
<Filename Value="C:\lazarus\components\rxnew\vclutils.pas"/>
<CursorPos X="22" Y="27"/>
<UsageCount Value="11"/>
</Unit20>
<Unit21>
<Filename Value="C:\lazarus\lcl\dbgrids.pas"/>
<UnitName Value="DBGrids"/>
<TopLine Value="151"/>
<CursorPos X="23" Y="152"/>
<UsageCount Value="11"/>
</Unit21>
<Unit22>
<Filename Value="C:\lazarus\lcl\grids.pas"/>
<UnitName Value="Grids"/>
<TopLine Value="3715"/>
<CursorPos X="3" Y="3719"/>
<UsageCount Value="11"/>
</Unit22>
<Unit23>
<Filename Value="..\..\vclutils.pas"/>
<EditorIndex Value="-1"/>
<TopLine Value="286"/>
<CursorPos X="30" Y="289"/>
<UsageCount Value="10"/>
</Unit23>
<Unit24>
<Filename Value="..\..\rxdbgrid.pas"/>
<TopLine Value="1105"/>
<CursorPos X="75" Y="1122"/>
<UsageCount Value="10"/>
</Unit24>
<Unit25>
<Filename Value="..\..\rx.inc"/>
<EditorIndex Value="-1"/>
<TopLine Value="18"/>
<CursorPos Y="52"/>
<UsageCount Value="10"/>
</Unit25>
</Units>
<JumpHistory Count="5" HistoryIndex="4">
<Position1>
<Filename Value="unit1.pas"/>
<Caret Line="46" Column="47" TopLine="27"/>
</Position1>
<Position2>
<Filename Value="unit1.pas"/>
<Caret Line="56" Column="12" TopLine="39"/>
</Position2>
<Position3>
<Filename Value="unit1.pas"/>
<Caret Line="71" Column="52" TopLine="51"/>
</Position3>
<Position4>
<Filename Value="unit1.pas"/>
<Caret Line="71" Column="52" TopLine="29"/>
</Position4>
<Position5>
<Filename Value="unit1.pas"/>
<Caret Line="40" TopLine="40"/>
</Position5>
</JumpHistory>
</ProjectOptions>
<CompilerOptions>
<Version Value="11"/>
<PathDelim Value="\"/>
<Target>
<Filename Value="project1"/>
</Target>
<SearchPaths>
<UnitOutputDirectory Value="lib\$(TargetCPU)-$(TargetOS)"/>
<SrcPath Value="$(LazarusDir)\lcl;$(LazarusDir)\lcl\interfaces\$(LCLWidgetType)"/>
</SearchPaths>
<Parsing>
<SyntaxOptions>
<UseAnsiStrings Value="False"/>
</SyntaxOptions>
</Parsing>
<Linking>
<Options>
<Win32>
<GraphicApplication Value="True"/>
</Win32>
</Options>
</Linking>
</CompilerOptions>
<Debugging>
<Exceptions Count="2">
<Item1>
<Name Value="ECodetoolError"/>
</Item1>
<Item2>
<Name Value="EFOpenError"/>
</Item2>
</Exceptions>
</Debugging>
</CONFIG>

43
RXLib/.svn/pristine/12/1282ed2ab765e154d28b4607bff143406bfd7e36.svn-base Normal file
View File

@@ -0,0 +1,43 @@
unit Unit2;
{$mode objfpc}{$H+}
interface
uses
Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, ExtCtrls,
StdCtrls;
type
{ TForm2 }
TForm2 = class(TForm)
Edit1: TEdit;
Edit2: TEdit;
Edit3: TEdit;
Panel1: TPanel;
procedure FormClose(Sender: TObject; var CloseAction: TCloseAction);
private
{ private declarations }
public
{ public declarations }
end;
var
Form2: TForm2 = nil;
implementation
{$R *.lfm}
{ TForm2 }
procedure TForm2.FormClose(Sender: TObject; var CloseAction: TCloseAction);
begin
CloseAction:=caFree;
Form2:=nil;
end;
end.