Menu
▾
▴
jvcl-checkins — Notice about new Check-In files to VCS
You can subscribe to this list here.
| 2002 |
Jan
|
Feb
|
Mar
|
Apr
|
May
(109) |
Jun
(322) |
Jul
(693) |
Aug
(335) |
Sep
(147) |
Oct
(146) |
Nov
(279) |
Dec
(147) |
|---|---|---|---|---|---|---|---|---|---|---|---|---|
| 2003 |
Jan
(362) |
Feb
(637) |
Mar
(407) |
Apr
(115) |
May
(134) |
Jun
(770) |
Jul
(330) |
Aug
(533) |
Sep
(585) |
Oct
(511) |
Nov
(692) |
Dec
(558) |
| 2004 |
Jan
(1696) |
Feb
(1207) |
Mar
(856) |
Apr
(788) |
May
(789) |
Jun
(416) |
Jul
(277) |
Aug
(353) |
Sep
(418) |
Oct
(176) |
Nov
(199) |
Dec
(528) |
| 2005 |
Jan
(322) |
Feb
(333) |
Mar
(276) |
Apr
(74) |
May
(272) |
Jun
(48) |
Jul
(64) |
Aug
(192) |
Sep
(174) |
Oct
(150) |
Nov
(95) |
Dec
(56) |
| 2006 |
Jan
(75) |
Feb
(165) |
Mar
(100) |
Apr
(182) |
May
(55) |
Jun
(135) |
Jul
(92) |
Aug
(67) |
Sep
(28) |
Oct
(46) |
Nov
(64) |
Dec
(49) |
| 2007 |
Jan
(67) |
Feb
(20) |
Mar
(53) |
Apr
(30) |
May
(28) |
Jun
(98) |
Jul
(27) |
Aug
(67) |
Sep
(29) |
Oct
(28) |
Nov
(42) |
Dec
(57) |
| 2008 |
Jan
(56) |
Feb
(37) |
Mar
(31) |
Apr
(21) |
May
(12) |
Jun
(12) |
Jul
(24) |
Aug
(32) |
Sep
(43) |
Oct
(79) |
Nov
(56) |
Dec
(53) |
| 2009 |
Jan
(84) |
Feb
(16) |
Mar
(43) |
Apr
(40) |
May
(22) |
Jun
(31) |
Jul
(61) |
Aug
(73) |
Sep
(39) |
Oct
(64) |
Nov
(19) |
Dec
(26) |
| 2010 |
Jan
(48) |
Feb
(16) |
Mar
(37) |
Apr
(20) |
May
(27) |
Jun
(33) |
Jul
(6) |
Aug
(6) |
Sep
(20) |
Oct
(37) |
Nov
(62) |
Dec
(11) |
| 2011 |
Jan
(12) |
Feb
(24) |
Mar
(15) |
Apr
(11) |
May
(14) |
Jun
(42) |
Jul
(14) |
Aug
(8) |
Sep
(27) |
Oct
(15) |
Nov
(47) |
Dec
(1) |
| 2012 |
Jan
(6) |
Feb
(70) |
Mar
(20) |
Apr
(4) |
May
(14) |
Jun
(73) |
Jul
(13) |
Aug
(19) |
Sep
(43) |
Oct
(17) |
Nov
(12) |
Dec
(3) |
| 2013 |
Jan
(16) |
Feb
(1) |
Mar
(3) |
Apr
(4) |
May
(23) |
Jun
(2) |
Jul
|
Aug
|
Sep
|
Oct
|
Nov
|
Dec
|
| 2014 |
Jan
|
Feb
|
Mar
|
Apr
|
May
|
Jun
|
Jul
|
Aug
|
Sep
(1) |
Oct
|
Nov
|
Dec
|
| 2022 |
Jan
|
Feb
|
Mar
|
Apr
|
May
|
Jun
|
Jul
|
Aug
|
Sep
|
Oct
(3) |
Nov
|
Dec
|
|
From: <ah...@us...> - 2012-09-04 11:38:35
|
Revision: 13409
http://jvcl.svn.sourceforge.net/jvcl/?rev=13409&view=rev
Author: ahuser
Date: 2012-09-04 11:38:24 +0000 (Tue, 04 Sep 2012)
Log Message:
-----------
Fixed access violation if comboedit was destroyed in CM_DIALOGKEY (e.g. editor for a virtualtree node)
Modified Paths:
--------------
trunk/jvcl/run/JvToolEdit.pas
Modified: trunk/jvcl/run/JvToolEdit.pas
===================================================================
--- trunk/jvcl/run/JvToolEdit.pas 2012-09-03 21:23:26 UTC (rev 13408)
+++ trunk/jvcl/run/JvToolEdit.pas 2012-09-04 11:38:24 UTC (rev 13409)
@@ -1478,7 +1478,7 @@
end
else
{$ENDIF COMPILER16_UP}
- ACanvas.Font.Color := DisabledTextColor;
+ ACanvas.Font.Color := DisabledTextColor;
ACanvas.TextRect(EditRect, X, EditRect.Top, S);
finally
RestoreDC(ACanvas.Handle, -1);
@@ -1494,7 +1494,7 @@
end
else
{$ENDIF COMPILER16_UP}
- Brush.Color := TEd(Editor).Color;
+ Brush.Color := TEd(Editor).Color;
ACanvas.TextRect(EditRect, X, EditRect.Top, S);
end;
end;
@@ -2115,12 +2115,12 @@
else
{$ENDIF COMPILER16_UP}
begin
- Canvas.Brush.Color := FDisabledColor;
- Canvas.Brush.Style := bsSolid;
- Canvas.FillRect(ClientRect);
- end;
+ Canvas.Brush.Color := FDisabledColor;
+ Canvas.Brush.Style := bsSolid;
+ Canvas.FillRect(ClientRect);
end;
end;
+end;
procedure TJvCustomComboEdit.FocusSet(PrevWnd: THandle);
begin
@@ -2366,7 +2366,11 @@
else
begin
{ must catch and remove this, since is actually multi-line }
- GetParentForm(Self).Perform(CM_DIALOGKEY, Byte(Key), 0);
+ if (Form <> nil) and (Form.Perform(CM_DIALOGKEY, Byte(Key), 0) <> 0) then
+ begin
+ Key := #0;
+ Exit;
+ end;
if Key = Cr then
begin
inherited KeyPress(Key);
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
|
|
From: <ah...@us...> - 2012-09-03 21:23:32
|
Revision: 13408
http://jvcl.svn.sourceforge.net/jvcl/?rev=13408&view=rev
Author: ahuser
Date: 2012-09-03 21:23:26 +0000 (Mon, 03 Sep 2012)
Log Message:
-----------
* Improved Installer startup performance, especially if started from a network share
* Mantis #5979: Improved 120dpi support.
Modified Paths:
--------------
trunk/jvcl/devtools/Common/PackageInformation.pas
trunk/jvcl/install/JVCLInstall/Frames/FrmConfigPage.dfm
trunk/jvcl/install/JVCLInstall/Frames/FrmDirEditBrowse.dfm
trunk/jvcl/install/JVCLInstall/Frames/FrmInstall.dfm
trunk/jvcl/install/JVCLInstall/Frames/FrmPackageSelection.dfm
trunk/jvcl/install/JVCLInstall/Frames/FrmUninstall.dfm
trunk/jvcl/install/JVCLInstall/Main.dfm
trunk/jvcl/install/JVCLInstall/PageBuilder.pas
trunk/jvcl/install/JVCLInstall/Pages/PgIDESelection.pas
Modified: trunk/jvcl/devtools/Common/PackageInformation.pas
===================================================================
--- trunk/jvcl/devtools/Common/PackageInformation.pas 2012-08-28 19:29:35 UTC (rev 13407)
+++ trunk/jvcl/devtools/Common/PackageInformation.pas 2012-09-03 21:23:26 UTC (rev 13408)
@@ -32,7 +32,7 @@
uses
SysUtils, Classes, Contnrs,
- JclSimpleXml;
+ JclSimpleXml, JclFileUtils;
type
TCompileTargetPlatform = (ctpWin32, ctpWin64);
@@ -252,6 +252,7 @@
FPackagesXmlDir: string;
FTargetSymbol: string;
FTargetPlatform: TCompileTargetPlatform;
+ FPackageXmlDirFileNames: TStringList;
function GetCount: Integer;
function GetPackages(Index: Integer): TBpgPackageTarget;
@@ -264,6 +265,7 @@
function GetIsVCLX: Boolean; virtual;
function GetPackageTargetClass: TBpgPackageTargetClass; virtual;
procedure LoadFile;
+ function XmlFileExists(const XmlName: string): Boolean;
public
constructor Create(const AFilename, APackagesXmlDir, ATargetSymbol: string; ATargetPlatform: TCompileTargetPlatform);
{ Set AFilename to '' if you want a PackageGroup instance that does not
@@ -482,20 +484,32 @@
function GetPackageXmlInfo(const BplName, XmlDir: string): TPackageXmlInfo; overload;
var
Index: Integer;
- GenericPrefix, Name: string;
+ GenericPrefix, Name, RuntimeName: string;
begin
GenericPrefix := XmlDir + PathDelim + BplNameToGenericName(BplName);
- Name := GenericPrefix + '-R.xml';
- if not FileExists(Name) then
- Name := GenericPrefix + '-D.xml';
+ RuntimeName := GenericPrefix + '-R.xml';
+ Name := RuntimeName;
// already in the cache
if XmlFileCache.Find(Name, Index) then
Result := TPackageXmlInfo(XmlFileCache.Objects[Index])
else
begin
- // create a new one and add it to the cache
- Result := TPackageXmlInfo.Create(Name); // do not localize
- XmlFileCache.AddObject(Name, Result);
+ Result := nil;
+ Name := GenericPrefix + '-D.xml';
+ if XmlFileCache.Find(Name, Index) then
+ Result := TPackageXmlInfo(XmlFileCache.Objects[Index])
+ else
+ begin
+ // Access the disk as the last option
+ if FileExists(RuntimeName) then
+ Name := RuntimeName;
+ end;
+ if Result = nil then
+ begin
+ // create a new one and add it to the cache
+ Result := TPackageXmlInfo.Create(Name); // do not localize
+ XmlFileCache.AddObject(Name, Result);
+ end;
end;
end;
@@ -1080,6 +1094,8 @@
FTargetSymbol := ATargetSymbol;
FTargetPlatform := ATargetPlatform;
FFilename := AFilename;
+ FPackageXmlDirFileNames := TStringList.Create;
+
FPackages := TObjectList.Create(Filename <> '');
if Filename <> '' then
LoadFile;
@@ -1087,6 +1103,7 @@
destructor TPackageGroup.Destroy;
begin
+ FPackageXmlDirFileNames.Free;
FPackages.Free;
inherited Destroy;
end;
@@ -1096,8 +1113,8 @@
GenericPrefix: string;
begin
Result := nil;
- GenericPrefix := PackagesXmlDir + PathDelim + BplNameToGenericName(TargetName);
- if FileExists(GenericPrefix + '-R.xml') or FileExists(GenericPrefix + '-D.xml') then // do not localize
+ GenericPrefix := {PackagesXmlDir + PathDelim +} BplNameToGenericName(TargetName);
+ if XmlFileExists(GenericPrefix + '-R.xml') or XmlFileExists(GenericPrefix + '-D.xml') then // do not localize
begin
try
Result := GetPackageTargetClass.Create(Self, TargetName, SourceName);
@@ -1189,6 +1206,10 @@
var
i: Integer;
begin
+ FPackageXmlDirFileNames.Clear;
+ BuildFileList(PackagesXmlDir + '\*.xml', faAnyFile, FPackageXmlDirFileNames, False);
+ FPackageXmlDirFileNames.Sorted := True;
+
if CompareText(ExtractFileExt(FileName), '.groupproj') = 0 then
LoadGroupProjFile
else
@@ -1360,6 +1381,11 @@
end;
end;
+function TPackageGroup.XmlFileExists(const XmlName: string): Boolean;
+begin
+ Result := FPackageXmlDirFileNames.IndexOf(XmlName) <> -1;
+end;
+
{ TBpgPackageTarget }
constructor TBpgPackageTarget.Create(AOwner: TPackageGroup; const ATargetName,
Modified: trunk/jvcl/install/JVCLInstall/Frames/FrmConfigPage.dfm
===================================================================
--- trunk/jvcl/install/JVCLInstall/Frames/FrmConfigPage.dfm 2012-08-28 19:29:35 UTC (rev 13407)
+++ trunk/jvcl/install/JVCLInstall/Frames/FrmConfigPage.dfm 2012-09-03 21:23:26 UTC (rev 13408)
@@ -374,10 +374,10 @@
object ComboBoxTargetIDE: TComboBox
Left = 80
Top = 8
- Width = 218
+ Width = 298
Height = 22
Style = csOwnerDrawFixed
- ItemHeight = 16
+ Anchors = [akLeft, akTop, akRight]
TabOrder = 6
OnChange = ComboBoxTargetIDEChange
OnDrawItem = ComboBoxTargetIDEDrawItem
@@ -388,6 +388,7 @@
Width = 129
Height = 25
Hint = 'Edit all compile time conditions that are in the jvcl.inc file.'
+ Anchors = [akTop, akRight]
Caption = 'Edit jvcl%s%d.inc'
ParentShowHint = False
ShowHint = True
Modified: trunk/jvcl/install/JVCLInstall/Frames/FrmDirEditBrowse.dfm
===================================================================
--- trunk/jvcl/install/JVCLInstall/Frames/FrmDirEditBrowse.dfm 2012-08-28 19:29:35 UTC (rev 13407)
+++ trunk/jvcl/install/JVCLInstall/Frames/FrmDirEditBrowse.dfm 2012-09-03 21:23:26 UTC (rev 13408)
@@ -27,6 +27,7 @@
Width = 279
Height = 21
Hint = 'Directory does not exist'
+ Anchors = [akLeft, akTop, akRight]
ParentShowHint = False
ShowHint = False
TabOrder = 0
@@ -40,6 +41,7 @@
Width = 21
Height = 21
Hint = 'Browse...'
+ Anchors = [akLeft, akTop, akRight]
Caption = '...'
ParentShowHint = False
ShowHint = True
Modified: trunk/jvcl/install/JVCLInstall/Frames/FrmInstall.dfm
===================================================================
--- trunk/jvcl/install/JVCLInstall/Frames/FrmInstall.dfm 2012-08-28 19:29:35 UTC (rev 13407)
+++ trunk/jvcl/install/JVCLInstall/Frames/FrmInstall.dfm 2012-09-03 21:23:26 UTC (rev 13408)
@@ -31,6 +31,7 @@
Width = 505
Height = 13
Cursor = crHandPoint
+ Anchors = [akLeft, akTop, akRight]
AutoSize = False
Caption = 'LblOpenFile'
Font.Charset = DEFAULT_CHARSET
@@ -49,6 +50,7 @@
Top = 32
Width = 505
Height = 17
+ Anchors = [akLeft, akTop, akRight]
TabOrder = 0
end
object ProgressBarCompile: TProgressBar
@@ -56,6 +58,7 @@
Top = 96
Width = 505
Height = 17
+ Anchors = [akLeft, akTop, akRight]
TabOrder = 1
end
object RichEditLog: TRichEdit
@@ -63,6 +66,7 @@
Top = 128
Width = 505
Height = 247
+ Anchors = [akLeft, akTop, akRight, akBottom]
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
@@ -80,6 +84,7 @@
Top = 128
Width = 81
Height = 25
+ Anchors = [akTop, akRight]
Caption = '&Details >>'
TabOrder = 3
OnClick = BtnDetailsClick
Modified: trunk/jvcl/install/JVCLInstall/Frames/FrmPackageSelection.dfm
===================================================================
--- trunk/jvcl/install/JVCLInstall/Frames/FrmPackageSelection.dfm 2012-08-28 19:29:35 UTC (rev 13407)
+++ trunk/jvcl/install/JVCLInstall/Frames/FrmPackageSelection.dfm 2012-09-03 21:23:26 UTC (rev 13408)
@@ -34,6 +34,7 @@
Top = 49
Width = 62
Height = 13
+ Anchors = [akTop, akRight]
Caption = '&Frameworks:'
FocusControl = CheckListBoxFrameworks
end
@@ -43,6 +44,7 @@
Width = 78
Height = 13
Alignment = taRightJustify
+ Anchors = [akTop, akRight]
Caption = '&Show packages:'
FocusControl = ComboBoxDisplayMode
end
@@ -53,6 +55,7 @@
Height = 272
OnClickCheck = CheckListBoxPackagesClickCheck
AllowGrayed = True
+ Anchors = [akLeft, akTop, akRight, akBottom]
ItemHeight = 18
ParentShowHint = False
PopupMenu = PopupMenuPackages
@@ -77,6 +80,7 @@
'w all packages. Only packages that depend on others'#13#10' are ch' +
'ecked/unchecked if necessary.'
Style = csDropDownList
+ Anchors = [akTop, akRight]
ItemHeight = 13
ParentShowHint = False
ShowHint = True
@@ -92,6 +96,7 @@
Top = 24
Width = 344
Height = 73
+ Anchors = [akLeft, akTop, akRight]
Columns = <
item
AutoSize = True
@@ -108,10 +113,10 @@
object CheckListBoxFrameworks: TCheckListBox
Left = 356
Top = 63
- Width = 154
+ Width = 157
Height = 31
OnClickCheck = CheckListBoxFrameworksClickCheck
- ItemHeight = 16
+ Anchors = [akTop, akRight]
Style = lbOwnerDrawVariable
TabOrder = 1
OnClick = CheckListBoxFrameworksClick
@@ -122,6 +127,7 @@
Width = 157
Height = 25
Action = ActionResetPackages
+ Anchors = [akTop, akRight]
ParentShowHint = False
ShowHint = True
TabOrder = 3
Modified: trunk/jvcl/install/JVCLInstall/Frames/FrmUninstall.dfm
===================================================================
--- trunk/jvcl/install/JVCLInstall/Frames/FrmUninstall.dfm 2012-08-28 19:29:35 UTC (rev 13407)
+++ trunk/jvcl/install/JVCLInstall/Frames/FrmUninstall.dfm 2012-09-03 21:23:26 UTC (rev 13408)
@@ -36,6 +36,7 @@
Top = 154
Width = 505
Height = 17
+ Anchors = [akLeft, akTop, akRight]
TabOrder = 0
end
object ProgressBarDelete: TProgressBar
@@ -43,6 +44,7 @@
Top = 202
Width = 505
Height = 17
+ Anchors = [akLeft, akTop, akRight]
TabOrder = 1
end
end
Modified: trunk/jvcl/install/JVCLInstall/Main.dfm
===================================================================
--- trunk/jvcl/install/JVCLInstall/Main.dfm 2012-08-28 19:29:35 UTC (rev 13407)
+++ trunk/jvcl/install/JVCLInstall/Main.dfm 2012-09-03 21:23:26 UTC (rev 13408)
@@ -47,6 +47,7 @@
Top = 8
Width = 116
Height = 31
+ AutoSize = True
BevelOuter = bvNone
Color = clWindow
TabOrder = 0
Modified: trunk/jvcl/install/JVCLInstall/PageBuilder.pas
===================================================================
--- trunk/jvcl/install/JVCLInstall/PageBuilder.pas 2012-08-28 19:29:35 UTC (rev 13407)
+++ trunk/jvcl/install/JVCLInstall/PageBuilder.pas 2012-09-03 21:23:26 UTC (rev 13408)
@@ -245,7 +245,7 @@
Width := tmpWidth;
end;
end;
- Inc(Width, GetDefaultCheckBoxSize.cx*4 div 2); // add checkbox size
+ Inc(Width, GetDefaultCheckBoxSize.cx*Canvas.Font.PixelsPerInch*4 div 2 div 96); // add checkbox size
if HorzOrientation = hoLeft then
X := 8
Modified: trunk/jvcl/install/JVCLInstall/Pages/PgIDESelection.pas
===================================================================
--- trunk/jvcl/install/JVCLInstall/Pages/PgIDESelection.pas 2012-08-28 19:29:35 UTC (rev 13407)
+++ trunk/jvcl/install/JVCLInstall/Pages/PgIDESelection.pas 2012-09-03 21:23:26 UTC (rev 13408)
@@ -249,6 +249,7 @@
begin
with TButton.Create(Client) do
begin
+ Width := Width * Font.PixelsPerInch div 96;
Left := Client.ClientWidth - Width - 8;
Top := Client.ClientHeight - Height - 8;
Anchors := [akRight, akBottom];
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
|
|
From: <ah...@us...> - 2012-08-28 19:29:42
|
Revision: 13407
http://jvcl.svn.sourceforge.net/jvcl/?rev=13407&view=rev
Author: ahuser
Date: 2012-08-28 19:29:35 +0000 (Tue, 28 Aug 2012)
Log Message:
-----------
Mantis #5968: Error in TJvEditorStrings.InsertText Unicode related
Modified Paths:
--------------
trunk/jvcl/run/JvEditor.pas
trunk/jvcl/run/JvUnicodeEditor.pas
Modified: trunk/jvcl/run/JvEditor.pas
===================================================================
--- trunk/jvcl/run/JvEditor.pas 2012-08-24 20:05:23 UTC (rev 13406)
+++ trunk/jvcl/run/JvEditor.pas 2012-08-28 19:29:35 UTC (rev 13407)
@@ -631,7 +631,14 @@
if Len < X then
begin
SetLength(BegLine, X - 1);
- FillChar(BegLine[Len + 1], X - Len - 1, ' ');
+ P := PChar(BegLine) + Len;
+ Len := X - Len - 1;
+ while Len > 0 do
+ begin
+ P^ := ' ';
+ Inc(P);
+ Dec(Len);
+ end;
end;
JvEditor.LockUpdate;
Modified: trunk/jvcl/run/JvUnicodeEditor.pas
===================================================================
--- trunk/jvcl/run/JvUnicodeEditor.pas 2012-08-24 20:05:23 UTC (rev 13406)
+++ trunk/jvcl/run/JvUnicodeEditor.pas 2012-08-28 19:29:35 UTC (rev 13407)
@@ -616,7 +616,14 @@
if Len < X then
begin
SetLength(BegLine, X - 1);
- FillChar(BegLine[Len + 1], X - Len - 1, ' ');
+ P := PWideChar(BegLine) + Len;
+ Len := X - Len - 1;
+ while Len > 0 do
+ begin
+ P^ := ' ';
+ Inc(P);
+ Dec(Len);
+ end;
end;
JvEditor.LockUpdate;
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
|
|
From: <jfu...@us...> - 2012-08-24 20:05:30
|
Revision: 13406
http://jvcl.svn.sourceforge.net/jvcl/?rev=13406&view=rev
Author: jfudickar
Date: 2012-08-24 20:05:23 +0000 (Fri, 24 Aug 2012)
Log Message:
-----------
TJvBaseDBLogonDialog: Now the conboboxes are filled again
Modified Paths:
--------------
trunk/jvcl/run/JvBaseDBLogonDialog.pas
Modified: trunk/jvcl/run/JvBaseDBLogonDialog.pas
===================================================================
--- trunk/jvcl/run/JvBaseDBLogonDialog.pas 2012-08-20 21:33:08 UTC (rev 13405)
+++ trunk/jvcl/run/JvBaseDBLogonDialog.pas 2012-08-24 20:05:23 UTC (rev 13406)
@@ -1056,6 +1056,7 @@
procedure TJvBaseDBLogonDialog.FillAllConnectionLists;
begin
+ FillAllComoboBoxes;
FillConnectionList;
FillDatabaseTreeView;
FillGroupTreeView;
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
|
|
From: <jfu...@us...> - 2012-08-20 21:33:14
|
Revision: 13405
http://jvcl.svn.sourceforge.net/jvcl/?rev=13405&view=rev
Author: jfudickar
Date: 2012-08-20 21:33:08 +0000 (Mon, 20 Aug 2012)
Log Message:
-----------
Handling of StorageOptions.StoreDefaultValues fixed. Class properties without a setter will now be stored when StoreDefaultValues is false
Modified Paths:
--------------
trunk/jvcl/run/JvAppStorage.pas
Modified: trunk/jvcl/run/JvAppStorage.pas
===================================================================
--- trunk/jvcl/run/JvAppStorage.pas 2012-08-19 17:58:12 UTC (rev 13404)
+++ trunk/jvcl/run/JvAppStorage.pas 2012-08-20 21:33:08 UTC (rev 13405)
@@ -2818,9 +2818,9 @@
// Note: we do not add a call to IsDefaultPropertyValue here because it would
// return True for any sub component which is not desirable as we want to
// always store sub classes whether they are components or not.
- if not StorageOptions.StoreDefaultValues and (
- not Assigned(P.GetProc) or not Assigned(P.SetProc) or
- not IsStoredProp(PersObj, P)) then
+ if not StorageOptions.StoreDefaultValues
+ and (not Assigned(P.GetProc) or not Assigned(P.SetProc) or not IsStoredProp(PersObj, P))
+ and (PropType(PersObj, PropName) <> tkClass) then // Classes can have data without having a stored property
Exit;
case PropType(PersObj, PropName) of
@@ -2891,7 +2891,8 @@
begin
if SubObj is TStrings then
begin
- WriteStringList(Path, TStrings(SubObj))
+ if StorageOptions.StoreDefaultValues or (TStrings(SubObj).Count > 0) then
+ WriteStringList(Path, TStrings(SubObj))
end
else
begin
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
|
|
From: <ah...@us...> - 2012-08-19 17:58:18
|
Revision: 13404
http://jvcl.svn.sourceforge.net/jvcl/?rev=13404&view=rev
Author: ahuser
Date: 2012-08-19 17:58:12 +0000 (Sun, 19 Aug 2012)
Log Message:
-----------
Mantis #5735: TJvStrHolder saves Cyrillic characters incorrect
Fixed by using UTF8 to encode/decode the string (incremented streaming format version)
Modified Paths:
--------------
trunk/jvcl/run/JvFormPlacement.pas
trunk/jvcl/run/JvJCLUtils.pas
trunk/jvcl/run/JvStringHolder.pas
Modified: trunk/jvcl/run/JvFormPlacement.pas
===================================================================
--- trunk/jvcl/run/JvFormPlacement.pas 2012-08-19 17:56:34 UTC (rev 13403)
+++ trunk/jvcl/run/JvFormPlacement.pas 2012-08-19 17:58:12 UTC (rev 13404)
@@ -1174,7 +1174,7 @@
if KeyString <> '' then
begin
SaveStrValue := VarToStr(SaveValue);
- SaveStrValue := XorEncode(KeyString, SaveStrValue);
+ SaveStrValue := XorEncodeString(KeyString, SaveStrValue);
StoredValues.Storage.WriteString(PathName, SaveStrValue);
end
else
@@ -1203,9 +1203,9 @@
if KeyString <> '' then
begin
DefaultStrValue := VarToStr(Value);
- DefaultStrValue := XorEncode(KeyString, DefaultStrValue);
+ DefaultStrValue := XorEncodeString(KeyString, DefaultStrValue);
RestoreStrValue := StoredValues.Storage.ReadString(PathName, DefaultStrValue);
- RestoreStrValue := XorDecode(KeyString, RestoreStrValue);
+ RestoreStrValue := XorDecodeString(KeyString, RestoreStrValue);
RestoreValue := RestoreStrValue;
end
else
Modified: trunk/jvcl/run/JvJCLUtils.pas
===================================================================
--- trunk/jvcl/run/JvJCLUtils.pas 2012-08-19 17:56:34 UTC (rev 13403)
+++ trunk/jvcl/run/JvJCLUtils.pas 2012-08-19 17:58:12 UTC (rev 13404)
@@ -640,7 +640,11 @@
if corresponds. }
function XorString(const Key, Src: ShortString): ShortString;
function XorEncode(const Key, Source: string): string;
+ {$IFDEF SUPPORTS_DEPRECATED}deprecated{$IFDEF SUPPORTS_DEPRECATED_DETAILS} 'use XorEncodeString that has support for non-ASCII chars'{$ENDIF};{$ENDIF}
function XorDecode(const Key, Source: string): string;
+ {$IFDEF SUPPORTS_DEPRECATED}deprecated{$IFDEF SUPPORTS_DEPRECATED_DETAILS} 'use XorEncodeString that has support for non-ASCII chars'{$ENDIF};{$ENDIF}
+function XorEncodeString(const Key, Source: string): string;
+function XorDecodeString(const Key, Source: string): string;
{ ** Command line routines ** }
@@ -5744,14 +5748,15 @@
function XorEncode(const Key, Source: string): string;
var
- I: Integer;
+ I, KeyLen: Integer;
C: Byte;
begin
Result := '';
+ KeyLen := Length(Key);
for I := 1 to Length(Source) do
begin
- if Length(Key) > 0 then
- C := Byte(Key[1 + ((I - 1) mod Length(Key))]) xor Byte(Source[I])
+ if KeyLen > 0 then
+ C := Byte(Key[1 + ((I - 1) mod KeyLen)]) xor Byte(Source[I])
else
C := Byte(Source[I]);
Result := Result + AnsiLowerCase(IntToHex(C, 2));
@@ -5760,19 +5765,83 @@
function XorDecode(const Key, Source: string): string;
var
- I: Integer;
+ I, KeyLen: Integer;
C: Char;
begin
Result := '';
+ KeyLen := Length(Key);
for I := 0 to Length(Source) div 2 - 1 do
begin
C := Char(StrToIntDef('$' + string(Source[I * 2 + 1] + Source[I * 2 + 2]), Ord(' ')));
- if Length(Key) > 0 then
- C := Char(Byte(Key[1 + (I mod Length(Key))]) xor Byte(C));
+ if KeyLen > 0 then
+ C := Char(Byte(Key[1 + (I mod KeyLen)]) xor Byte(C));
Result := Result + C;
end;
end;
+function XorEncodeString(const Key, Source: string): string;
+const
+ HexChars: array[0..15] of Char =
+ ('0', '1', '2', '3', '4', '5', '6', '7', '8', '9', 'a', 'b', 'c', 'd', 'e', 'f');
+var
+ I, KeyLen: Integer;
+ C: Byte;
+ Utf8Src, Utf8Key: UTF8String;
+begin
+ Result := '';
+ Utf8Src := UTF8Encode(Source);
+ Utf8Key := UTF8Encode(Key);
+ KeyLen := Length(Utf8Key);
+ SetLength(Result, Length(Utf8Src) * 2);
+ for I := 1 to Length(Utf8Src) do
+ begin
+ if KeyLen > 0 then
+ C := Byte(Utf8Src[I]) xor Byte(Utf8Key[1 + ((I - 1) mod KeyLen)])
+ else
+ C := Byte(Utf8Src[I]);
+ Result[1 + (I - 1) * 2] := HexChars[C shr 4];
+ Result[1 + (I - 1) * 2 + 1] := HexChars[C and $0F];
+ end;
+end;
+
+function XorDecodeString(const Key, Source: string): string;
+var
+ I, KeyLen: Integer;
+ C: Char;
+ B: Byte;
+ Utf8Result, Utf8Key: UTF8String;
+begin
+ Result := '';
+ Utf8Key := UTF8Encode(Key);
+ KeyLen := Length(Utf8Key);
+ SetLength(Utf8Result, Length(Source) div 2);
+ for I := 0 to Length(Source) div 2 - 1 do
+ begin
+ // HexToInt
+ C := Source[1 + I * 2];
+ case C of
+ '0'..'9': B := Ord(C) - Ord('0');
+ 'A'..'F': B := Ord(C) - 55;
+ 'a'..'f': B := Ord(C) - 87;
+ else
+ B := Ord(' ');
+ end;
+ B := B shl 4;
+ C := Source[1 + I * 2 + 1];
+ case C of
+ '0'..'9': B := B or (Ord(C) - Ord('0'));
+ 'A'..'F': B := B or (Ord(C) - 55);
+ 'a'..'f': B := B or (Ord(C) - 87);
+ else
+ B := Ord(' ');
+ end;
+ if KeyLen > 0 then
+ B := B xor Byte(Utf8Key[1 + (I mod KeyLen)]);
+ Utf8Result[1 + I] := AnsiChar(B);
+ end;
+ Result := UTF8ToString(Utf8Result);
+end;
+
function GetCmdLineArg(const Switch: string; ASwitchChars: TSysCharSet): string;
var
I: Integer;
Modified: trunk/jvcl/run/JvStringHolder.pas
===================================================================
--- trunk/jvcl/run/JvStringHolder.pas 2012-08-19 17:56:34 UTC (rev 13403)
+++ trunk/jvcl/run/JvStringHolder.pas 2012-08-19 17:58:12 UTC (rev 13404)
@@ -217,7 +217,8 @@
JvJCLUtils, JvResources, JvConsts, JvTypes;
const
- XorVersion = 1;
+ AnsiXorVersion = 1;
+ XorVersion = 2;
function ExtractName(const Items: string; var Pos: Integer): string;
var
@@ -785,8 +786,15 @@
while not Reader.EndOfList do
begin
Tmp := Reader.ReadString;
- if FReserved >= XorVersion then
- Strings.Add(XorDecode(KeyString, Tmp))
+ if FReserved >= AnsiXorVersion then
+ begin
+ if FReserved >= XorVersion then
+ Strings.Add(XorDecodeString(KeyString, Tmp))
+ else
+ {$WARNINGS OFF} // XorDecode is deprecated, but we need it for backward compatibility, so hide the warning
+ Strings.Add(XorDecode(KeyString, Tmp));
+ {$WARNINGS ON}
+ end
else
Strings.Add(string(XorString(ShortString(KeyString), ShortString(Tmp))));
end;
@@ -837,7 +845,7 @@
Writer.WriteListBegin;
Writer.WriteString(KeyString);
for I := 0 to Strings.Count - 1 do
- Writer.WriteString(XorEncode(KeyString, Strings[I]));
+ Writer.WriteString(XorEncodeString(KeyString, Strings[I]));
Writer.WriteListEnd;
end;
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
|
|
From: <ah...@us...> - 2012-08-19 17:56:42
|
Revision: 13403
http://jvcl.svn.sourceforge.net/jvcl/?rev=13403&view=rev
Author: ahuser
Date: 2012-08-19 17:56:34 +0000 (Sun, 19 Aug 2012)
Log Message:
-----------
Fixed Delphi 6 compile warning and error
Modified Paths:
--------------
trunk/jvcl/run/JvDBLookup.pas
trunk/jvcl/run/JvMenus.pas
Modified: trunk/jvcl/run/JvDBLookup.pas
===================================================================
--- trunk/jvcl/run/JvDBLookup.pas 2012-08-19 09:19:08 UTC (rev 13402)
+++ trunk/jvcl/run/JvDBLookup.pas 2012-08-19 17:56:34 UTC (rev 13403)
@@ -2381,6 +2381,10 @@
end;
procedure TJvPopupDataList.CreateParams(var Params: TCreateParams);
+{$IFDEF COMPILER6}
+const
+ CS_DROPSHADOW = $20000;
+{$ENDIF COMPILER6}
begin
inherited CreateParams(Params);
with Params do
Modified: trunk/jvcl/run/JvMenus.pas
===================================================================
--- trunk/jvcl/run/JvMenus.pas 2012-08-19 09:19:08 UTC (rev 13402)
+++ trunk/jvcl/run/JvMenus.pas 2012-08-19 17:56:34 UTC (rev 13403)
@@ -1763,8 +1763,10 @@
end;
end;
+{$WARNINGS OFF} // prevent compiler from showing the deprecated warning in Delphi 6
procedure TJvPopupMenu.DefaultDrawItem(Item: TMenuItem; Rect: TRect;
State: TMenuOwnerDrawState);
+{$WARNINGS ON}
begin
DrawItem(Item, Rect, State)
end;
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
|
|
From: <ah...@us...> - 2012-08-19 09:19:14
|
Revision: 13402
http://jvcl.svn.sourceforge.net/jvcl/?rev=13402&view=rev
Author: ahuser
Date: 2012-08-19 09:19:08 +0000 (Sun, 19 Aug 2012)
Log Message:
-----------
Mantis #5666: JvDBComboBox cant resolve List DataSet FieldsNames (missing designtime property editors)
Modified Paths:
--------------
trunk/jvcl/design/JvDBReg.pas
Modified: trunk/jvcl/design/JvDBReg.pas
===================================================================
--- trunk/jvcl/design/JvDBReg.pas 2012-08-19 08:35:09 UTC (rev 13401)
+++ trunk/jvcl/design/JvDBReg.pas 2012-08-19 09:19:08 UTC (rev 13402)
@@ -40,7 +40,7 @@
{$IFDEF JV_MIDAS}
JvDBRemoteLogin,
{$ENDIF JV_MIDAS}
- {$IFDEF USE_3RDPARTY_DOA}
+ {$IFDEF USE_3RDPARTY_DOA}
JvOracleDataset,
JvDBPasswordDialogDoa,
JvDBLogonDialogDoa,
@@ -62,7 +62,7 @@
JvDBSearchComboBox, JvAppDBStorage, JvDBFindEdit, JvDBImage, JvDBEditors,
JvDBMemDatasetEditor, JvDBGridExportEditors, JvDBGridEditors, JvCsvDataEditor,
JvDBActionsEngine, JvDBActions, JvDBCheckBox,
- JvDBActnResForm, JvDataSource, JvDataSourceIntf,
+ JvDBActnResForm, JvDataSource, JvDataSourceIntf,
JvDynControlEngineVCL // This prevents runtime error messages about not initialized JvDynControlEngine
;
@@ -73,6 +73,7 @@
cDataField = 'DataField';
cKeyField = 'KeyField';
cListField = 'ListField';
+ cDisplayField = 'DisplayField';
cListKeyField = 'ListKeyField';
cMasterField = 'MasterField';
cDetailField = 'DetailField';
@@ -117,7 +118,10 @@
RegisterPropertyEditor(TypeInfo(TDataFieldString), TJvDataConnector, cListField, TJvListFieldProperty);
RegisterPropertyEditor(TypeInfo(TDataFieldString), TJvDataConnector, cListKeyField, TJvListFieldProperty);
RegisterPropertyEditor(TypeInfo(TDataFieldString), TJvDataConnector, cLookupField, TJvLookupSourceProperty);
-
+
+ RegisterPropertyEditor(TypeInfo(string), TJvDBComboBoxListSettings, cKeyField, TJvDataFieldProperty);
+ RegisterPropertyEditor(TypeInfo(string), TJvDBComboBoxListSettings, cDisplayField, TJvDataFieldProperty);
+
RegisterPropertyEditor(TypeInfo(string), TJvLookupControl, cLookupField, TJvLookupSourceProperty);
RegisterPropertyEditor(TypeInfo(string), TJvDBLookupEdit, cLookupField, TJvLookupSourceProperty);
RegisterPropertyEditor(TypeInfo(string), TJvDBTreeView, cItemField, TJvDataFieldProperty);
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
|
|
From: <ah...@us...> - 2012-08-19 08:35:15
|
Revision: 13401
http://jvcl.svn.sourceforge.net/jvcl/?rev=13401&view=rev
Author: ahuser
Date: 2012-08-19 08:35:09 +0000 (Sun, 19 Aug 2012)
Log Message:
-----------
Mantis #5945: Cannot complete installation (RAD Studio XE2) [define INTERNET_COMPONENT set]
Modified Paths:
--------------
trunk/jvcl/run/JvInterpreter_httpapp.pas
trunk/jvcl/run/JvgHTTPVersionInfo.pas
Modified: trunk/jvcl/run/JvInterpreter_httpapp.pas
===================================================================
--- trunk/jvcl/run/JvInterpreter_httpapp.pas 2012-08-19 08:16:20 UTC (rev 13400)
+++ trunk/jvcl/run/JvInterpreter_httpapp.pas 2012-08-19 08:35:09 UTC (rev 13401)
@@ -52,8 +52,12 @@
implementation
uses
- SysUtils, Classes,
- HTTPApp;
+ {$IFDEF HAS_UNITSCOPE}
+ Web.HTTPApp,
+ {$ELSE}
+ HTTPApp,
+ {$ENDIF HAS_UNITSCOPE}
+ SysUtils, Classes;
{ function ReadClient(var Buffer; Count: Integer): Integer; }
Modified: trunk/jvcl/run/JvgHTTPVersionInfo.pas
===================================================================
--- trunk/jvcl/run/JvgHTTPVersionInfo.pas 2012-08-19 08:16:20 UTC (rev 13400)
+++ trunk/jvcl/run/JvgHTTPVersionInfo.pas 2012-08-19 08:35:09 UTC (rev 13401)
@@ -51,7 +51,7 @@
function GetProgramURL: string;
function GetComments: string;
procedure OnLoadVersionInfo(Sender: TObject; const PDisp: IDispatch;
- var URL: OleVariant);
+ {$IFDEF COMPILER16_UP}const{$ELSE}var{$ENDIF} URL: OleVariant);
public
property VersionInfo: TStrings read GetVersionInfoProperty;
function GetVersionInfo(WinControl: TWinControl): Boolean;
@@ -142,7 +142,7 @@
end;
procedure TJvgHTTPVersionInfo.OnLoadVersionInfo(Sender: TObject;
- const PDisp: IDispatch; var URL: OleVariant);
+ const PDisp: IDispatch; {$IFDEF COMPILER16_UP}const{$ELSE}var{$ENDIF} URL: OleVariant);
var
Doc: Variant;
begin
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
|
|
From: <ah...@us...> - 2012-08-19 08:16:26
|
Revision: 13400
http://jvcl.svn.sourceforge.net/jvcl/?rev=13400&view=rev
Author: ahuser
Date: 2012-08-19 08:16:20 +0000 (Sun, 19 Aug 2012)
Log Message:
-----------
* Mantis #5958: Strings longer than 255 characters cause exception
* More than 1024 items overwrote memory
Modified Paths:
--------------
trunk/jvcl/run/JvgAskListBox.pas
Modified: trunk/jvcl/run/JvgAskListBox.pas
===================================================================
--- trunk/jvcl/run/JvgAskListBox.pas 2012-08-17 16:03:56 UTC (rev 13399)
+++ trunk/jvcl/run/JvgAskListBox.pas 2012-08-19 08:16:20 UTC (rev 13400)
@@ -75,7 +75,7 @@
FCaptionsAlign_: UINT;
FShowText: Boolean;
FSegment1Width: Word;
- FPushedButton: array[0..1023] of Byte;
+ FPushedButton: array of Byte;
FOnButtonClicked: TNotifyEvent;
FSelectedItem: Word;
FButtons: TStringList;
@@ -246,7 +246,6 @@
FTextAlign.OnChanged := SmthChanged;
FCaptionsAlign.OnChanged := SmthChanged;
- FillChar(FPushedButton, SizeOf(FPushedButton), #0);
FWallpaper := nil;
end;
@@ -323,18 +322,17 @@
procedure DrawTextInRect(Rect: TRect; Align: Word; StrListNum: Integer);
var
FontColor: TColor;
- szStr: array[0..255] of Char;
- Len: Word;
+ S: string;
+ Len: Integer;
TextStyle: TglTextStyle;
begin
Dec(Rect.Right, 2);
- // FillMemory(@szStr,255,0);
if StrListNum = -1 then
- StrPCopy(szStr, Items[Index])
+ S := Items[Index]
else
- StrPCopy(szStr, Buttons[StrListNum - 1]);
+ S := Buttons[StrListNum - 1];
- Len := StrLen(szStr);
+ Len := Length(S);
if StrListNum = -1 then
begin
@@ -361,47 +359,47 @@
begin
Canvas.Font.Color := clBtnHighlight;
OffsetRect(Rect, -1, -1);
- DrawText(Canvas, szStr, Len, Rect, Align);
+ DrawText(Canvas, PChar(S), Len, Rect, Align);
Canvas.Font.Color := clBtnShadow;
OffsetRect(Rect, 2, 2);
- DrawText(Canvas, szStr, Len, Rect, Align);
+ DrawText(Canvas, PChar(S), Len, Rect, Align);
Canvas.Font.Color := FontColor;
OffsetRect(Rect, -1, -1);
- DrawText(Canvas, szStr, Len, Rect, Align);
+ DrawText(Canvas, PChar(S), Len, Rect, Align);
end;
fstRecessed:
begin
Canvas.Font.Color := clBtnShadow;
OffsetRect(Rect, -1, -1);
- DrawText(Canvas, szStr, Len, Rect, Align);
+ DrawText(Canvas, PChar(S), Len, Rect, Align);
Canvas.Font.Color := clBtnHighlight;
OffsetRect(Rect, 2, 2);
- DrawText(Canvas, szStr, Len, Rect, Align);
+ DrawText(Canvas, PChar(S), Len, Rect, Align);
Canvas.Font.Color := FontColor;
OffsetRect(Rect, -1, -1);
- DrawText(Canvas, szStr, Len, Rect, Align);
+ DrawText(Canvas, PChar(S), Len, Rect, Align);
end;
fstPushed:
begin
Canvas.Font.Color := clBtnHighlight;
- DrawText(Canvas, szStr, Len, Rect, Align);
+ DrawText(Canvas, PChar(S), Len, Rect, Align);
OffsetRect(Rect, -1, -1);
Canvas.Font.Color := clBtnShadow;
- DrawText(Canvas, szStr, Len, Rect, Align);
+ DrawText(Canvas, PChar(S), Len, Rect, Align);
end;
fstShadow:
begin
Canvas.Font.Color := clBtnShadow;
OffsetRect(Rect, 2, 2);
- DrawText(Canvas, szStr, Len, Rect, Align);
+ DrawText(Canvas, PChar(S), Len, Rect, Align);
Canvas.Font.Color := FontColor;
OffsetRect(Rect, -2, -2);
- DrawText(Canvas, szStr, Len, Rect, Align);
+ DrawText(Canvas, PChar(S), Len, Rect, Align);
end;
else
begin
Canvas.Font.Color := FontColor;
- DrawText(Canvas, szStr, Len, Rect, Align);
+ DrawText(Canvas, PChar(S), Len, Rect, Align);
end;
end;
end;
@@ -418,6 +416,9 @@
Rect := rcItem;
end;
+ if Length(FPushedButton) <> Items.Count then
+ SetLength(FPushedButton, Items.Count);
+
Canvas.Brush := Brush;
// if State = [odSelected,odFocused] then Exit;
Canvas.FrameRect(Rect);
@@ -795,6 +796,8 @@
I: Word;
begin
Result := False;
+ if Length(FPushedButton) <> Items.Count then
+ SetLength(FPushedButton, Items.Count);
for I := 0 to Items.Count - 1 do
if FPushedButton[I] = 0 then
Exit;
@@ -806,6 +809,8 @@
I: Word;
begin
Result := 0;
+ if Length(FPushedButton) <> Items.Count then
+ SetLength(FPushedButton, Items.Count);
if Colon = 0 then
begin
for I := 0 to Items.Count - 1 do
@@ -845,7 +850,11 @@
if Index >= Items.Count then
Result := -1
else
+ begin
+ if Length(FPushedButton) <> Items.Count then
+ SetLength(FPushedButton, Items.Count);
Result := FPushedButton[Index];
+ end;
end;
function TJvgAskListBox.SetPushedButtonInLine(Index: Word; Value: Word): Boolean;
@@ -855,6 +864,8 @@
if (Index < Items.Count) and (Value <= FButtons.Count) then
begin
Result := True;
+ if Length(FPushedButton) <> Items.Count then
+ SetLength(FPushedButton, Items.Count);
if FPushedButton[Index] = Value then
Exit;
FPushedButton[Index] := Value;
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
|
|
From: <ah...@us...> - 2012-08-17 16:04:03
|
Revision: 13399
http://jvcl.svn.sourceforge.net/jvcl/?rev=13399&view=rev
Author: ahuser
Date: 2012-08-17 16:03:56 +0000 (Fri, 17 Aug 2012)
Log Message:
-----------
Updated newsgroups links
Modified Paths:
--------------
trunk/jvcl/readme.htm
Modified: trunk/jvcl/readme.htm
===================================================================
--- trunk/jvcl/readme.htm 2012-08-16 17:33:38 UTC (rev 13398)
+++ trunk/jvcl/readme.htm 2012-08-17 16:03:56 UTC (rev 13399)
@@ -1594,11 +1594,12 @@
href="http://jvcl.sourceforge.net">http://jvcl.sourceforge.net</a> </li>
<li dir="ltr">
<p dir="ltr">Newsgroups. You can access the JVCL newsgroups at <a
- href="news://forums.talkto.net/jedi.vcl">
-news://forums.talkto.net/jedi.vcl</a> (preferred). Thanks to Marco
-Cantú (author of the "Mastering Delphi" books), you can also
-access the
-newsgroups from the Web at <a
+ href="news://news.delphi-jedi.org/jedi.jvcl">
+news://news.delphi-jedi.org/jedi.jvcl</a> (preferred). Another way to access
+the newsgroups is to use the web gateway <a href="http://newsportal.delphi-jedi.org">
+http://newsportal.delphi-jedi.org</a>. Thanks to Marco Cantú
+(author of the "Mastering Delphi" books), you can also
+access the newsgroups from the Web at <a
href="http://delphi.newswhat.com/geoxml/forumlistgroups?area=JEDI">
http://delphi.newswhat.com/geoxml/forumlistgroups?area=JEDI</a>. </p>
</li>
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
|
|
From: <ah...@us...> - 2012-08-16 17:33:44
|
Revision: 13398
http://jvcl.svn.sourceforge.net/jvcl/?rev=13398&view=rev
Author: ahuser
Date: 2012-08-16 17:33:38 +0000 (Thu, 16 Aug 2012)
Log Message:
-----------
Fixed access violation when editor was destroyed and the VCL wants to backup the WindowText.
Modified Paths:
--------------
trunk/jvcl/run/JvEditorCommon.pas
Modified: trunk/jvcl/run/JvEditorCommon.pas
===================================================================
--- trunk/jvcl/run/JvEditorCommon.pas 2012-08-16 17:23:19 UTC (rev 13397)
+++ trunk/jvcl/run/JvEditorCommon.pas 2012-08-16 17:33:38 UTC (rev 13398)
@@ -2793,7 +2793,7 @@
var
S: string;
begin
- if Msg.Text = nil then
+ if (Msg.Text = nil) or (csDestroying in ComponentState) then // stupid VCL wants to save the WindowText when the control is released
Msg.Result := 0
else
begin
@@ -2806,7 +2806,10 @@
procedure TJvCustomEditorBase.WMGetTextLength(var Msg: TMessage);
begin
- Msg.Result := GetTextLen;
+ if csDestroying in ComponentState then // stupid VCL wants to save the WindowText when the control is released
+ Msg.Result := 0
+ else
+ Msg.Result := GetTextLen;
end;
procedure TJvCustomEditorBase.UpdateEditorSize;
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
|
|
From: <ah...@us...> - 2012-08-16 17:23:26
|
Revision: 13397
http://jvcl.svn.sourceforge.net/jvcl/?rev=13397&view=rev
Author: ahuser
Date: 2012-08-16 17:23:19 +0000 (Thu, 16 Aug 2012)
Log Message:
-----------
* Fixed Mantis #5956: TJvEdit triggers "Feature Not Implemented" error on 64 bit version
* Removed ShellMessageBox function that was unofficial prior to XP and discontinued with XP SP3.
* Removed ChangeTopException. Use AcquireExceptionObject instead of hacking the exception handling.
* Fixed/Removed all DELPHI64_TEMPORARY ifdefs
Modified Paths:
--------------
trunk/jvcl/HooksAndHacks.txt
trunk/jvcl/run/DBT.pas
trunk/jvcl/run/JvCaptionButton.pas
trunk/jvcl/run/JvComputerInfoEx.pas
trunk/jvcl/run/JvFixedEditPopUp.pas
trunk/jvcl/run/JvInterpreter_JvUtils.pas
trunk/jvcl/run/JvJCLUtils.pas
trunk/jvcl/run/JvJVCLUtils.pas
trunk/jvcl/run/JvPageSetup.pas
trunk/jvcl/run/JvProgressComponent.pas
trunk/jvcl/run/JvTFSparseMatrix.pas
trunk/jvcl/run/JvThemes.pas
trunk/jvcl/run/JvUrlGrabbers.pas
trunk/jvcl/run/JvWinDialogs.pas
Modified: trunk/jvcl/HooksAndHacks.txt
===================================================================
--- trunk/jvcl/HooksAndHacks.txt 2012-08-13 13:01:22 UTC (rev 13396)
+++ trunk/jvcl/HooksAndHacks.txt 2012-08-16 17:23:19 UTC (rev 13397)
@@ -16,3 +16,5 @@
JvBandObject:
* MakeMsgHookInstance creates a helper function in memory that injects the hidden Self parameter (x64 ready)
+JvPageSetup:
+ * THackCommonDialog, hard typecast to get access to private fields
Modified: trunk/jvcl/run/DBT.pas
===================================================================
--- trunk/jvcl/run/DBT.pas 2012-08-13 13:01:22 UTC (rev 13396)
+++ trunk/jvcl/run/DBT.pas 2012-08-16 17:23:19 UTC (rev 13397)
@@ -53,7 +53,7 @@
(*$HPPEMIT '' *)
uses
- Windows;
+ Windows, Messages;
{ *
* BroadcastSpecialMessage constants
@@ -571,10 +571,13 @@
type
TWMDeviceChange = record
- Msg: Cardinal;
- Event: {$IFDEF DELPHI64_TEMPORARY}WPARAM{$ELSE}UINT{$ENDIF};
- dwData: Pointer;
- Result: LRESULT;
+ Msg: Cardinal;
+ {$IFDEF COMPILER16_UP}
+ MsgFiller: TDWordFiller;
+ {$ENDIF COMPILER16_UP}
+ Event: WPARAM;
+ dwData: Pointer;
+ Result: LRESULT;
end;
implementation
Modified: trunk/jvcl/run/JvCaptionButton.pas
===================================================================
--- trunk/jvcl/run/JvCaptionButton.pas 2012-08-13 13:01:22 UTC (rev 13396)
+++ trunk/jvcl/run/JvCaptionButton.pas 2012-08-16 17:23:19 UTC (rev 13397)
@@ -332,8 +332,12 @@
GMsimg32Handle: THandle = 0;
GTriedLoadMsimg32Dll: Boolean = False;
- _AlphaBlend: Pointer;
- _TransparentBlt: Pointer;
+ _AlphaBlend: function(hdcDest: HDC; nXOriginDest, nYOriginDest, nWidthDest,
+ nHeightDest: Integer; hdcSrc: HDC; nXOriginSrc, nYOriginSrc, nWidthSrc,
+ nHeightSrc: Integer; BlendFunction: BLENDFUNCTION): BOOL; stdcall;
+ _TransparentBlt: function(hdcDest: HDC; nXOriginDest, nYOriginDest, nWidthDest, hHeightDest: Integer;
+ hdcSrc: HDC; nXOriginSrc, nYOriginSrc, nWidthSrc, nHeightSrc: Integer;
+ crTransparent: UINT): BOOL; stdcall;
{$IFDEF JVCLThemesEnabled}
@@ -511,8 +515,8 @@
procedure UnloadMsimg32Dll;
begin
- _TransparentBlt := nil;
- _AlphaBlend := nil;
+ @_TransparentBlt := nil;
+ @_AlphaBlend := nil;
if GMsimg32Handle > 0 then
FreeLibrary(GMsimg32Handle);
GMsimg32Handle := 0;
@@ -524,8 +528,8 @@
GMsimg32Handle := SafeLoadLibrary(Msimg32DLLName);
if GMsimg32Handle <> 0 then
begin
- _TransparentBlt := GetProcAddress(GMsimg32Handle, TransparentBltName);
- _AlphaBlend := GetProcAddress(GMsimg32Handle, AlphaBlendName);
+ @_TransparentBlt := GetProcAddress(GMsimg32Handle, TransparentBltName);
+ @_AlphaBlend := GetProcAddress(GMsimg32Handle, AlphaBlendName);
end;
end;
@@ -707,38 +711,26 @@
//=== Global procedures ======================================================
-function AlphaBlend;
+function AlphaBlend(hdcDest: HDC; nXOriginDest, nYOriginDest, nWidthDest,
+ nHeightDest: Integer; hdcSrc: HDC; nXOriginSrc, nYOriginSrc, nWidthSrc,
+ nHeightSrc: Integer; BlendFunction: BLENDFUNCTION): BOOL; stdcall;
begin
if not GTriedLoadMsimg32Dll then
LoadMsimg32Dll;
- Result := Assigned(_AlphaBlend);
- {$IFDEF DELPHI64_TEMPORARY}
- System.Error(rePlatformNotImplemented);
- {$ELSE ~DELPHI64_TEMPORARY}
- if Result then
- asm
- mov esp, ebp
- pop ebp
- jmp [_AlphaBlend]
- end;
- {$ENDIF ~DELPHI64_TEMPORARY}
+ Result := Assigned(_AlphaBlend) and
+ _AlphaBlend(hdcDest, nXOriginDest, nYOriginDest, nWidthDest, nHeightDest, hdcSrc,
+ nXOriginSrc, nYOriginSrc, nWidthSrc, nHeightSrc, BlendFunction);
end;
-function TransparentBlt;
+function TransparentBlt(hdcDest: HDC; nXOriginDest, nYOriginDest, nWidthDest, hHeightDest: Integer;
+ hdcSrc: HDC; nXOriginSrc, nYOriginSrc, nWidthSrc, nHeightSrc: Integer;
+ crTransparent: UINT): BOOL; stdcall;
begin
if not GTriedLoadMsimg32Dll then
LoadMsimg32Dll;
- Result := Assigned(_TransparentBlt);
- {$IFDEF DELPHI64_TEMPORARY}
- System.Error(rePlatformNotImplemented);
- {$ELSE ~DELPHI64_TEMPORARY}
- if Result then
- asm
- mov esp, ebp
- pop ebp
- jmp [_TransparentBlt]
- end;
- {$ENDIF ~DELPHI64_TEMPORARY}
+ Result := Assigned(_TransparentBlt) and
+ _TransparentBlt(hdcDest, nXOriginDest, nYOriginDest, nWidthDest, hHeightDest, hdcSrc,
+ nXOriginSrc, nYOriginSrc, nWidthSrc, nHeightSrc, crTransparent);
end;
{$IFDEF JVCLThemesEnabled}
@@ -1171,7 +1163,7 @@
procedure TGlobalXPData.Update;
begin
- FIsThemed := ThemeServices.{$IFDEF RTL230_UP}Available{$ELSE}ThemesAvailable{$ENDIF RTL230_UP} and IsThemeActive and IsAppThemed;
+ FIsThemed := StyleServices.Available and IsThemeActive and IsAppThemed;
if not FIsThemed then
Exit;
@@ -2646,7 +2638,7 @@
{ force theme data refresh, needed when
* Non-themed application and switching system font size }
- if not ThemeServices.{$IFDEF RTL230_UP}Enabled{$ELSE}ThemesEnabled{$ENDIF RTL230_UP} then
+ if not StyleServices.Enabled then
ThemeServices.UpdateThemes;
{$ENDIF JVCLThemesEnabled}
end;
Modified: trunk/jvcl/run/JvComputerInfoEx.pas
===================================================================
--- trunk/jvcl/run/JvComputerInfoEx.pas 2012-08-13 13:01:22 UTC (rev 13396)
+++ trunk/jvcl/run/JvComputerInfoEx.pas 2012-08-16 17:23:19 UTC (rev 13397)
@@ -163,7 +163,10 @@
TWMDeviceChange = record
Msg: Cardinal;
- Event: {$IFDEF DELPHI64_TEMPORARY}WPARAM{$ELSE}UINT{$ENDIF};
+ {$IFDEF COMPILER16_UP}
+ MsgFiller: TDWordFiller;
+ {$ENDIF COMPILER16_UP}
+ Event: WPARAM;
dwData: Pointer;
Result: LRESULT;
end;
Modified: trunk/jvcl/run/JvFixedEditPopUp.pas
===================================================================
--- trunk/jvcl/run/JvFixedEditPopUp.pas 2012-08-13 13:01:22 UTC (rev 13396)
+++ trunk/jvcl/run/JvFixedEditPopUp.pas 2012-08-16 17:23:19 UTC (rev 13397)
@@ -281,25 +281,9 @@
function THiddenPopupObject.GetClipboardCommands: TJvClipboardCommands;
const
cClipboardCommands = 'ClipboardCommands';
-{$IFNDEF DELPHI64_TEMPORARY}
-var
- Value: TIntegerSet;
- I: Integer;
-{$ENDIF ~DELPHI64_TEMPORARY}
begin
if IsPublishedProp(Edit, cClipboardCommands) then
- begin
- Result := [];
- {$IFDEF DELPHI64_TEMPORARY}
- System.Error(rePlatformNotImplemented);
- {$ELSE ~DELPHI64_TEMPORARY}
- // does it really have to be this complicated ?!
- Value := TIntegerSet(GetOrdProp(Edit, cClipboardCommands));
- for I := 0 to SizeOf(Integer) * 8 - 1 do
- if I in Value then
- Include(Result, TJvClipboardCommand(I));
- {$ENDIF ~DELPHI64_TEMPORARY}
- end
+ Result := TJvClipboardCommands(Byte(GetOrdProp(Edit, cClipboardCommands)))
else
Result := [caCopy, caCut, caPaste, caUndo];
end;
Modified: trunk/jvcl/run/JvInterpreter_JvUtils.pas
===================================================================
--- trunk/jvcl/run/JvInterpreter_JvUtils.pas 2012-08-13 13:01:22 UTC (rev 13396)
+++ trunk/jvcl/run/JvInterpreter_JvUtils.pas 2012-08-16 17:23:19 UTC (rev 13397)
@@ -811,13 +811,6 @@
Value := IntPower(Args.Values[0], Args.Values[1]);
end;
-{ function ChangeTopException(E: TObject): TObject; }
-
-procedure JvInterpreter_ChangeTopException(var Value: Variant; Args: TJvInterpreterArgs);
-begin
- Value := O2V(ChangeTopException(V2O(Args.Values[0])));
-end;
-
{ function MakeValidFileName(const FileName: TFileName; const ReplaceBadChar: Char): TFileName; }
procedure JvInterpreter_MakeValidFileName(var Value: Variant; Args: TJvInterpreterArgs);
@@ -1058,7 +1051,6 @@
AddFunction(cJvUtils, 'SwapInt', JvInterpreter_SwapInt, 2, [varInteger or varByRef, varInteger or varByRef],
varEmpty);
AddFunction(cJvUtils, 'IntPower', JvInterpreter_IntPower, 2, [varInteger, varInteger], varEmpty);
- AddFunction(cJvUtils, 'ChangeTopException', JvInterpreter_ChangeTopException, 1, [varObject], varEmpty);
AddFunction(cJvUtils, 'MakeValidFileName', JvInterpreter_MakeValidFileName, 2, [varEmpty, varEmpty], varEmpty);
AddFunction(cJvUtils, 'AnsiStrLIComp', JvInterpreter_AnsiStrLIComp, 3, [varEmpty, varEmpty, varEmpty], varEmpty);
AddFunction(cJvUtils, 'Var2Type', JvInterpreter_Var2Type, 2, [varEmpty, varInteger], varEmpty);
Modified: trunk/jvcl/run/JvJCLUtils.pas
===================================================================
--- trunk/jvcl/run/JvJCLUtils.pas 2012-08-13 13:01:22 UTC (rev 13396)
+++ trunk/jvcl/run/JvJCLUtils.pas 2012-08-16 17:23:19 UTC (rev 13397)
@@ -326,7 +326,6 @@
{**** other routines }
procedure SwapInt(var Int1, Int2: Integer); {$IFDEF SUPPORTS_INLINE} inline; {$ENDIF SUPPORTS_INLINE}
function IntPower(Base, Exponent: Integer): Integer;
-function ChangeTopException(E: TObject): TObject; // Linux version writes error message to ErrOutput
function StrToBool(const S: string): Boolean;
function Var2Type(V: Variant; const DestVarType: Integer): Variant;
@@ -2442,47 +2441,6 @@
Result := 1;
end;
-function ChangeTopException(E: TObject): TObject;
-type
- PRaiseFrame = ^TRaiseFrame;
- TRaiseFrame = record
- NextRaise: PRaiseFrame;
- ExceptAddr: Pointer;
- ExceptObject: TObject;
- //ExceptionRecord: PExceptionRecord;
- end;
-begin
- {$IFDEF DELPHI64_TEMPORARY}
- System.Error(rePlatformNotImplemented);
- Result := E;
- {$ELSE ~DELPHI64_TEMPORARY}
- { C++ Builder 3 Warning !}
- { if linker error occured with message "unresolved external 'System::RaiseList'" try
- comment this function implementation, compile,
- then uncomment and compile again. }
- {$IFDEF MSWINDOWS}
- {$IFDEF SUPPORTS_DEPRECATED}
- {$WARN SYMBOL_DEPRECATED OFF}
- {$ENDIF SUPPORTS_DEPRECATED}
- if RaiseList <> nil then
- begin
- Result := PRaiseFrame(RaiseList)^.ExceptObject;
- PRaiseFrame(RaiseList)^.ExceptObject := E
- end
- else
- Result := nil;
- {$IFDEF SUPPORTS_DEPRECATED}
- {$WARN SYMBOL_DEPRECATED ON}
- {$ENDIF SUPPORTS_DEPRECATED}
- {$ENDIF MSWINDOWS}
- {$IFDEF UNIX}
- // XXX: changing exception in stack frame is not supported on Kylix
- Writeln(ErrOutput, 'ChangeTopException');
- Result := E;
- {$ENDIF UNIX}
- {$ENDIF ~DELPHI64_TEMPORARY}
-end;
-
function KeyPressed(VK: Integer): Boolean;
begin
Result := Windows.GetKeyState(VK) and $8000 = $8000;
@@ -7548,15 +7506,10 @@
var
S: string;
begin
- {$IFDEF DELPHI64_TEMPORARY}
- if INT_PTR(ResID) <= $FFFF then
+ if DWORD_PTR(ResID) <= $FFFF then
S := IntToStr(INT_PTR(ResID))
- {$ELSE ~DELPHI64_TEMPORARY}
- if LongRec(ResID).Hi = 0 then
- S := IntToStr(LongRec(ResID).Lo)
- {$ENDIF ~DELPHI64_TEMPORARY}
else
- S := StrPas(ResID);
+ S := ResID;
raise EResNotFound.CreateResFmt(@SResNotFound, [S]);
end;
Modified: trunk/jvcl/run/JvJVCLUtils.pas
===================================================================
--- trunk/jvcl/run/JvJVCLUtils.pas 2012-08-13 13:01:22 UTC (rev 13396)
+++ trunk/jvcl/run/JvJVCLUtils.pas 2012-08-16 17:23:19 UTC (rev 13397)
@@ -1533,13 +1533,8 @@
try
if Module <> 0 then
begin
- {$IFDEF DELPHI64_TEMPORARY}
- if INT_PTR(ResID) <= $FFFF then
+ if DWORD_PTR(ResID) <= $FFFF then
Result.LoadFromResourceID(Module, INT_PTR(ResID))
- {$ELSE ~DELPHI64_TEMPORARY}
- if LongRec(ResID).Hi = 0 then
- Result.LoadFromResourceID(Module, LongRec(ResID).Lo)
- {$ENDIF ~DELPHI64_TEMPORARY}
else
Result.LoadFromResourceName(Module, StrPas(ResID));
end
Modified: trunk/jvcl/run/JvPageSetup.pas
===================================================================
--- trunk/jvcl/run/JvPageSetup.pas 2012-08-13 13:01:22 UTC (rev 13396)
+++ trunk/jvcl/run/JvPageSetup.pas 2012-08-16 17:23:19 UTC (rev 13397)
@@ -32,6 +32,7 @@
JclUnitVersioning,
{$ENDIF UNITVERSIONING}
Windows, Classes, Messages, Graphics, CommDlg, Dialogs,
+ JclBase,
JvBaseDlg;
const
@@ -269,7 +270,7 @@
// Generic dialog hook. Centers the dialog on the screen in response to
// the WM_INITDIALOG message
-function DialogHook(Wnd: HWND; Msg: UINT; AWParam: WPARAM; ALParam: LPARAM): {$IFDEF RTL230_UP}UINT_PTR{$ELSE}UINT{$ENDIF RTL230_UP}; stdcall;
+function DialogHook(Wnd: HWND; Msg: UINT; AWParam: WPARAM; ALParam: LPARAM): UINT_PTR; stdcall;
begin
Result := 0;
if Msg = WM_INITDIALOG then
@@ -283,7 +284,7 @@
end;
end;
-function PageDrawHook(Wnd: HWND; Msg: UINT; AWParam: WPARAM; ALParam: LPARAM): {$IFDEF RTL230_UP}UINT_PTR{$ELSE}UINT{$ENDIF RTL230_UP}; stdcall;
+function PageDrawHook(Wnd: HWND; Msg: UINT; AWParam: WPARAM; ALParam: LPARAM): UINT_PTR; stdcall;
const
PagePaintWhat: array [WM_PSD_FULLPAGERECT..WM_PSD_YAFULLPAGERECT] of TJvPSPaintWhat =
(pwFullPage, pwMinimumMargins, pwMargins,
@@ -355,7 +356,7 @@
function CopyData(Handle: THandle): THandle;
var
- Src, Dest: {$IFDEF COMPILER12_UP}PByte{$ELSE}PChar{$ENDIF COMPILER12_UP};
+ Src, Dest: PByte;
Size: Integer;
begin
if Handle <> 0 then
@@ -491,8 +492,7 @@
const
IDPRINTERBTN = $0402;
begin
- if not ((Msg.ItemID = IDPRINTERBTN) and
- (Msg.NotifyCode = BN_CLICKED) and DoPrinter) then
+ if not ((Msg.ItemID = IDPRINTERBTN) and (Msg.NotifyCode = BN_CLICKED) and DoPrinter) then
inherited;
end;
@@ -548,32 +548,32 @@
var
ActiveWindow: HWND;
WindowList: Pointer;
- {$IFNDEF DELPHI64_TEMPORARY}
+ {$IFDEF CPU86}
FPUControlWord: Word;
- {$ENDIF ~DELPHI64_TEMPORARY}
+ {$ENDIF CPU86}
begin
ActiveWindow := GetActiveWindow;
WindowList := DisableTaskWindows(0);
try
Application.HookMainWindow(MessageHook);
- {$IFNDEF DELPHI64_TEMPORARY}
+ {$IFDEF CPU86}
asm
// Avoid FPU control word change in NETRAP.dll, NETAPI32.dll, etc
FNSTCW FPUControlWord
end;
- {$ENDIF ~DELPHI64_TEMPORARY}
+ {$ENDIF CPU86}
try
CreationControl := Self;
PageSetupControl := Self;
Result := TDialogFunc(DialogFunc)(DialogData);
finally
PageSetupControl := nil;
- {$IFNDEF DELPHI64_TEMPORARY}
+ {$IFDEF CPU86}
asm
FNCLEX
FLDCW FPUControlWord
end;
- {$ENDIF ~DELPHI64_TEMPORARY}
+ {$ENDIF CPU86}
Application.UnhookMainWindow(MessageHook);
end;
finally
Modified: trunk/jvcl/run/JvProgressComponent.pas
===================================================================
--- trunk/jvcl/run/JvProgressComponent.pas 2012-08-13 13:01:22 UTC (rev 13396)
+++ trunk/jvcl/run/JvProgressComponent.pas 2012-08-16 17:23:19 UTC (rev 13397)
@@ -262,10 +262,7 @@
// (Owner as TJvProgressComponent).FOnShow(Self);
except
on E: Exception do
- begin
- (Owner as TJvProgressComponent).FException := E;
- ChangeTopException(nil);
- end;
+ (Owner as TJvProgressComponent).FException := AcquireExceptionObject;
end;
finally
ModalResult := mrOk;
Modified: trunk/jvcl/run/JvTFSparseMatrix.pas
===================================================================
--- trunk/jvcl/run/JvTFSparseMatrix.pas 2012-08-13 13:01:22 UTC (rev 13396)
+++ trunk/jvcl/run/JvTFSparseMatrix.pas 2012-08-16 17:23:19 UTC (rev 13397)
@@ -214,9 +214,6 @@
P, Prev, Curr: PSMQuantum;
RowExists: Boolean;
begin
- {$IFDEF DELPHI64_TEMPORARY}
- System.Error(rePlatformNotImplemented);
- {$ENDIF DELPHI64_TEMPORARY}
if FindQuantum(Row, Col, Prev, Curr, RowExists) then
if Data <> NullValue then
Curr^.Data := Data
@@ -234,9 +231,7 @@
P^.Index := Row;
P^.Link := nil;
P^.Data := Prev^.Data;
- {$IFNDEF DELPHI64_TEMPORARY}
PSMQuantum(Prev^.Data) := P;
- {$ENDIF ~DELPHI64_TEMPORARY}
Prev := P;
end;
Modified: trunk/jvcl/run/JvThemes.pas
===================================================================
--- trunk/jvcl/run/JvThemes.pas 2012-08-13 13:01:22 UTC (rev 13396)
+++ trunk/jvcl/run/JvThemes.pas 2012-08-16 17:23:19 UTC (rev 13397)
@@ -728,6 +728,7 @@
const BoundingRect: TRect; out AContentRect: TRect): Boolean;
function IsSystemStyle: Boolean;
function Enabled: Boolean;
+ function Available: Boolean;
{$ENDIF ~COMPILER16_UP}
end;
@@ -1468,6 +1469,11 @@
begin
Result := ThemesEnabled;
end;
+
+function TThemeServicesEx.Available: Boolean;
+begin
+ Result := ThemesAvailable;
+end;
{$ENDIF ~COMPILER16_UP}
function ThemeServices: TThemeServicesEx;
Modified: trunk/jvcl/run/JvUrlGrabbers.pas
===================================================================
--- trunk/jvcl/run/JvUrlGrabbers.pas 2012-08-13 13:01:22 UTC (rev 13396)
+++ trunk/jvcl/run/JvUrlGrabbers.pas 2012-08-16 17:23:19 UTC (rev 13397)
@@ -337,6 +337,7 @@
uses
WinInet,
+ JclBase, // DWORD_PTR
JvResources;
const
@@ -802,7 +803,7 @@
// Connect to the host
hHostConnection := InternetConnect(hSession, PChar(HostName), Port,
- UserName, Password, INTERNET_SERVICE_HTTP, 0, DWORD(Self));
+ UserName, Password, INTERNET_SERVICE_HTTP, 0, DWORD_PTR(Self));
if Terminated then
Exit;
Modified: trunk/jvcl/run/JvWinDialogs.pas
===================================================================
--- trunk/jvcl/run/JvWinDialogs.pas 2012-08-13 13:01:22 UTC (rev 13396)
+++ trunk/jvcl/run/JvWinDialogs.pas 2012-08-16 17:23:19 UTC (rev 13397)
@@ -603,8 +603,6 @@
function CopyFile(FromFile, ToDir: string): Boolean;
function ShellObjectTypeEnumToConst(ShellObjectType: TShellObjectType): UINT;
function ShellObjectTypeConstToEnum(ShellObjectType: UINT): TShellObjectType;
-function ShellMessageBox(Instance: THandle; Owner: THandle; Text: PChar;
- Caption: PChar; Style: UINT; Parameters: array of Pointer): Integer; cdecl;
type
FreePIDLProc = procedure(PIDL: PItemIDList); stdcall;
@@ -1204,69 +1202,6 @@
SHAddToRecentDocs(SHARD_PATH, nil);
end;
-function ExecuteShellMessageBox(MethodPtr: Pointer; Instance: THandle;
- Owner: HWND; Text: Pointer; Caption: Pointer; Style: UINT;
- Parameters: array of Pointer): Integer;
-type
- PPointer = ^Pointer;
-{$IFNDEF DELPHI64_TEMPORARY}
-var
- ParamCount: Integer;
- ParamBuffer: PChar;
- BufferIndex: Integer;
-{$ENDIF ~DELPHI64_TEMPORARY}
-begin
- {$IFDEF DELPHI64_TEMPORARY}
- System.Error(rePlatformNotImplemented);
- Result := MaxInt; // to remove the warning
- {$ELSE ~DELPHI64_TEMPORARY}
- ParamCount := High(Parameters) + 1;
- GetMem(ParamBuffer, ParamCount * SizeOf(Pointer));
- try
- for BufferIndex := 0 to High(Parameters) do
- begin
- PPointer(@ParamBuffer[BufferIndex * SizeOf(Pointer)])^ :=
- Parameters[High(Parameters) - BufferIndex];
- end;
- asm
- mov ECX, ParamCount
- cmp ECX, 0
- je @MethodCall
- mov EDX, ParamBuffer
-@StartLoop:
- push DWORD PTR[EDX]
- add EDX, 4
- loop @StartLoop
-@MethodCall:
- push Style
- push Caption
- push Text
- push Owner
- push Instance
-
- call MethodPtr
- mov Result, EAX
- end;
- finally
- FreeMem(ParamBuffer);
- end;
- {$ENDIF ~DELPHI64_TEMPORARY}
-end;
-
-function ShellMessageBox(Instance: THandle; Owner: THandle; Text: PChar;
- Caption: PChar; Style: UINT; Parameters: array of Pointer): Integer;
-var
- MethodPtr: Pointer;
- ShellDLL: HMODULE;
-begin
- ShellDLL := SafeLoadLibrary(Shell32);
- MethodPtr := GetProcAddress(ShellDLL, PChar(183));
- if Assigned(MethodPtr) then
- Result := ExecuteShellMessageBox(MethodPtr, Instance, Owner, Text, Caption, Style, Parameters)
- else
- Result := ID_CANCEL;
-end;
-
//=== { TJvOutOfMemoryDialog } ===============================================
function TJvOutOfMemoryDialog.Execute(ParentWnd: HWND): Boolean;
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
|
|
From: <ou...@us...> - 2012-08-13 13:01:28
|
Revision: 13396
http://jvcl.svn.sourceforge.net/jvcl/?rev=13396&view=rev
Author: outchy
Date: 2012-08-13 13:01:22 +0000 (Mon, 13 Aug 2012)
Log Message:
-----------
Mantis 5742: String to unsigned int conversion ?
Rename StrToCardinal to StrToUInt.
Modified Paths:
--------------
trunk/jvcl/design/JvIPAddressEditor.pas
Modified: trunk/jvcl/design/JvIPAddressEditor.pas
===================================================================
--- trunk/jvcl/design/JvIPAddressEditor.pas 2012-08-13 10:55:42 UTC (rev 13395)
+++ trunk/jvcl/design/JvIPAddressEditor.pas 2012-08-13 13:01:22 UTC (rev 13396)
@@ -260,7 +260,7 @@
procedure TJvIPAddressAsNumberProperty.SetValue(const Value: string);
begin
- SetOrdValue(StrToCardinal(Value));
+ SetOrdValue(StrToUInt(Value));
end;
{ TJvIPAddressAsTextProperty }
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
|
|
From: <ou...@us...> - 2012-08-13 10:55:50
|
Revision: 13395
http://jvcl.svn.sourceforge.net/jvcl/?rev=13395&view=rev
Author: outchy
Date: 2012-08-13 10:55:42 +0000 (Mon, 13 Aug 2012)
Log Message:
-----------
Mantis 5875: 2 packages are missing from D9 project groups.
Modified Paths:
--------------
trunk/jvcl/packages/D9 Packages.bdsgroup
Modified: trunk/jvcl/packages/D9 Packages.bdsgroup
===================================================================
--- trunk/jvcl/packages/D9 Packages.bdsgroup 2012-08-13 07:19:23 UTC (rev 13394)
+++ trunk/jvcl/packages/D9 Packages.bdsgroup 2012-08-13 10:55:42 UTC (rev 13395)
@@ -41,8 +41,8 @@
<Projects Name="JvPascalInterpreterDesign90.bpl" Type="String">d9\JvPascalInterpreterDesign.bdsproj</Projects>
<Projects Name="JvBands90.bpl" Type="String">d9\JvBands.bdsproj</Projects>
<Projects Name="JvBandsDesign90.bpl" Type="String">d9\JvBandsDesign.bdsproj</Projects>
- <Projects Name="JvPlugin90.bpl" Type="String">d9\JvPlugin.bdsproj</Projects>
- <Projects Name="JvPluginDesign90.bpl" Type="String">d9\JvPluginDesign.bdsproj</Projects>
+ <Projects Name="JvPluginSystem90.bpl" Type="String">d9\JvPluginSystem.bdsproj</Projects>
+ <Projects Name="JvPluginSystemDesign90.bpl" Type="String">d9\JvPluginSystemDesign.bdsproj</Projects>
<Projects Name="JvJans90.bpl" Type="String">d9\JvJans.bdsproj</Projects>
<Projects Name="JvJansDesign90.bpl" Type="String">d9\JvJansDesign.bdsproj</Projects>
<Projects Name="JvGlobus90.bpl" Type="String">d9\JvGlobus.bdsproj</Projects>
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
|
|
From: <ah...@us...> - 2012-08-13 07:19:30
|
Revision: 13394
http://jvcl.svn.sourceforge.net/jvcl/?rev=13394&view=rev
Author: ahuser
Date: 2012-08-13 07:19:23 +0000 (Mon, 13 Aug 2012)
Log Message:
-----------
Added CS_DROPSHADOW (WinXP+) to make LookupCombo look more like a ComboBox
Modified Paths:
--------------
trunk/jvcl/run/JvDBLookup.pas
Modified: trunk/jvcl/run/JvDBLookup.pas
===================================================================
--- trunk/jvcl/run/JvDBLookup.pas 2012-08-12 11:31:50 UTC (rev 13393)
+++ trunk/jvcl/run/JvDBLookup.pas 2012-08-13 07:19:23 UTC (rev 13394)
@@ -2389,6 +2389,8 @@
ExStyle := WS_EX_TOOLWINDOW;
AddBiDiModeExStyle(ExStyle);
WindowClass.Style := CS_SAVEBITS;
+ if CheckWin32Version(5, 1) then // Windows XP+
+ WindowClass.Style := WindowClass.Style or CS_DROPSHADOW;
end;
end;
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
|
|
From: <ah...@us...> - 2012-08-12 11:31:58
|
Revision: 13393
http://jvcl.svn.sourceforge.net/jvcl/?rev=13393&view=rev
Author: ahuser
Date: 2012-08-12 11:31:50 +0000 (Sun, 12 Aug 2012)
Log Message:
-----------
Fixed iss syntax errors
Modified Paths:
--------------
trunk/jvcl/install/ISS/Install.iss
trunk/jvcl/install/ISS/Skin/isxskin.iss
Modified: trunk/jvcl/install/ISS/Install.iss
===================================================================
--- trunk/jvcl/install/ISS/Install.iss 2012-08-11 23:20:08 UTC (rev 13392)
+++ trunk/jvcl/install/ISS/Install.iss 2012-08-12 11:31:50 UTC (rev 13393)
@@ -83,7 +83,7 @@
ShowLanguageDialog=auto
OptimizedChecks=yes
-// for skin
+; for skin
#define MyWizardBottomImageFile "Skin\images\wizardbottom.bmp"
#define MyWizardButtonImageFile "Skin\images\button.bmp"
#define MyWizardImageFile "wizard.bmp"
Modified: trunk/jvcl/install/ISS/Skin/isxskin.iss
===================================================================
--- trunk/jvcl/install/ISS/Skin/isxskin.iss 2012-08-11 23:20:08 UTC (rev 13392)
+++ trunk/jvcl/install/ISS/Skin/isxskin.iss 2012-08-12 11:31:50 UTC (rev 13393)
@@ -21,25 +21,26 @@
ButtonImages: array [0..4] of TBitmapImage;
ButtonLabels: array [0..4] of TLabel;
-procedure UpdateButton(AButton: TButton;AButtonIndex: integer);
+procedure UpdateButton(AButton: TButton; AButtonIndex: integer);
begin
- ButtonLabels[AButtonIndex].Caption:=AButton.Caption;
- ButtonPanels[AButtonIndex].Visible:=AButton.Visible;
- ButtonLabels[AButtonIndex].Enabled:=AButton.Enabled;
+ ButtonLabels[AButtonIndex].Caption := AButton.Caption;
+ ButtonPanels[AButtonIndex].Visible := AButton.Visible;
+ ButtonLabels[AButtonIndex].Enabled := AButton.Enabled;
end;
procedure ButtonLabelClick(Sender: TObject);
var
button: TButton;
begin
- ButtonImages[TLabel(Sender).Tag].Left:=0;
- if not ButtonLabels[TLabel(Sender).Tag].Enabled then Exit;
+ ButtonImages[TLabel(Sender).Tag].Left := 0;
+ if not ButtonLabels[TLabel(Sender).Tag].Enabled then
+ Exit;
case TLabel(Sender).Tag of
- bidBack: button:=WizardForm.BackButton;
- bidNext: button:=WizardForm.NextButton;
- bidCancel: button:=WizardForm.CancelButton;
- bidDirBrowse: button:=WizardForm.DirBrowseButton;
- bidGroupBrowse: button:=WizardForm.GroupBrowseButton;
+ bidBack: button := WizardForm.BackButton;
+ bidNext: button := WizardForm.NextButton;
+ bidCancel: button := WizardForm.CancelButton;
+ bidDirBrowse: button := WizardForm.DirBrowseButton;
+ bidGroupBrowse: button := WizardForm.GroupBrowseButton;
else
Exit;
end;
@@ -49,12 +50,12 @@
procedure ButtonLabelMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
if (Button=mbLeft) and (ButtonLabels[TLabel(Sender).Tag].Enabled) then
- ButtonImages[TLabel(Sender).Tag].Left:=-BUTTONWIDTH;
+ ButtonImages[TLabel(Sender).Tag].Left := -BUTTONWIDTH;
end;
procedure ButtonLabelMouseUp(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
- ButtonImages[TLabel(Sender).Tag].Left:=0;
+ ButtonImages[TLabel(Sender).Tag].Left := 0;
end;
procedure LoadButtonImage(AButton: TButton; AButtonIndex: integer);
@@ -63,89 +64,86 @@
panel: TPanel;
labl: TLabel;
FileName: String;
-
begin
- panel:=TPanel.Create(WizardForm);
+ panel := TPanel.Create(WizardForm);
with panel do begin
- Parent:=AButton.Parent;
- Color:=BUTTONPANELCOLOR;
- Tag:=AButtonIndex;
- Left:=AButton.Left;
- Top:=AButton.Top;
- Width:=AButton.Width;
- Height:=AButton.Height;
+ Parent := AButton.Parent;
+ Color := BUTTONPANELCOLOR;
+ Tag := AButtonIndex;
+ Left := AButton.Left;
+ Top := AButton.Top;
+ Width := AButton.Width;
+ Height := AButton.Height;
end;
- ButtonPanels[AButtonIndex]:=panel;
+ ButtonPanels[AButtonIndex] := panel;
- image:=TBitmapImage.Create(WizardForm);
- FileName:=ExtractFileName('{#MyWizardButtonImageFile}');
+ image := TBitmapImage.Create(WizardForm);
+ FileName := ExtractFileName('{#MyWizardButtonImageFile}');
with image do begin
- Height:=BUTTONHEIGHT;
- Width:=BUTTONWIDTH*2;
+ Height := BUTTONHEIGHT;
+ Width := BUTTONWIDTH*2;
Bitmap.LoadFromFile(ExpandConstant('{tmp}\')+FileName);
- Parent:=panel;
- Enabled:=false;
+ Parent := panel;
+ Enabled := false;
end;
- ButtonImages[AButtonIndex]:=image;
+ ButtonImages[AButtonIndex] := image;
with TLabel.Create(WizardForm) do begin
- Tag:=AButtonIndex;
- Parent:=panel;
- Width:=panel.Width;
- Height:=panel.Height;
- transparent:=true;
- OnClick:=@ButtonLabelClick;
- OnDblClick:=@ButtonLabelClick;
- OnMouseDown:=@ButtonLabelMouseDown;
- OnMouseUp:=@ButtonLabelMouseUp;
+ Tag := AButtonIndex;
+ Parent := panel;
+ Width := panel.Width;
+ Height := panel.Height;
+ transparent := true;
+ OnClick := @ButtonLabelClick;
+ OnDblClick := @ButtonLabelClick;
+ OnMouseDown := @ButtonLabelMouseDown;
+ OnMouseUp := @ButtonLabelMouseUp;
end;
- labl:=TLabel.Create(WizardForm);
+ labl := TLabel.Create(WizardForm);
with labl do begin
- Tag:=AButtonIndex;
- Alignment:=taCenter;
- Transparent:=true;
- AutoSize:=false;
- Top:=(BUTTONHEIGHT div 4);
- Left:=0;
- Width:=panel.ClientWidth;
- Parent:=panel;
+ Tag := AButtonIndex;
+ Alignment := taCenter;
+ Transparent := true;
+ AutoSize := false;
+ Top := (BUTTONHEIGHT div 4);
+ Left := 0;
+ Width := panel.ClientWidth;
+ Parent := panel;
if AButtonIndex = bidNext then
Font.Style := [fsBold];
- Font.Color:=clWhite;
- Caption:=AButton.Caption;
- OnClick:=@ButtonLabelClick;
- OnDblClick:=@ButtonLabelClick;
- OnMouseDown:=@ButtonLabelMouseDown;
- OnMouseUp:=@ButtonLabelMouseUp;
+ Font.Color := clWhite;
+ Caption := AButton.Caption;
+ OnClick := @ButtonLabelClick;
+ OnDblClick := @ButtonLabelClick;
+ OnMouseDown := @ButtonLabelMouseDown;
+ OnMouseUp := @ButtonLabelMouseUp;
end;
- ButtonLabels[AButtonIndex]:=labl;
+ ButtonLabels[AButtonIndex] := labl;
end;
procedure LicenceAcceptedRadioOnClick(Sender: TObject);
begin
- ButtonLabels[bidNext].Enabled:=true;
+ ButtonLabels[bidNext].Enabled := true;
end;
procedure LicenceNotAcceptedRadioOnClick(Sender: TObject);
begin
- ButtonLabels[bidNext].Enabled:=false;
+ ButtonLabels[bidNext].Enabled := false;
end;
-
procedure InitializeSkin;
var
- image : TBitmapImage;
+ image: TBitmapImage;
TypesComboItemIndex: integer;
FileName: String;
-
begin
with WizardForm do
with OuterNotebook do
with InnerPage do
with InnerNotebook do
with SelectComponentsPage do
- TypesComboItemIndex:=TypesCombo.ItemIndex;
+ TypesComboItemIndex := TypesCombo.ItemIndex;
WizardForm.Bevel.Hide;
@@ -153,483 +151,482 @@
WizardForm.SelectDirBitmapImage.Hide;
WizardForm.SelectGroupBitmapImage.Hide;
- image:=TBitmapImage.Create(WizardForm);
- image.Top:=451;
- image.Width:=690;
- image.Height:=45;
+ image := TBitmapImage.Create(WizardForm);
+ image.Top := 451;
+ image.Width := 690;
+ image.Height := 45;
- FileName:=ExtractFileName('{#MyWizardBottomImageFile}');
+ FileName := ExtractFileName('{#MyWizardBottomImageFile}');
ExtractTemporaryFile(FileName);
image.Bitmap.LoadFromFile(ExpandConstant('{tmp}\')+FileName);
- image.Parent:=WizardForm;
+ image.Parent := WizardForm;
image.SendToBack;
-
-with WizardForm do begin
- Position:=poScreenCenter;
- ClientWidth:=690
- ClientHeight:=496
- Font.Color:=$ffffff
- Font.Name:='MS Sans Serif'
- Font.Style:=[]
- with CancelButton do begin
- Left:=555
- Top:=460
- Width:=BUTTONWIDTH;
- Height:=BUTTONHEIGHT;
- end
- with NextButton do begin
- Left:=371
- Top:=460
- Width:=BUTTONWIDTH;
- Height:=BUTTONHEIGHT;
- end
- with BackButton do begin
- Left:=266
- Top:=460
- Width:=BUTTONWIDTH;
- Height:=BUTTONHEIGHT;
- end
-
- with OuterNotebook do begin
- Left:=190
- Top:=59
- Width:=500
- Height:=392
- with WelcomePage do begin
- Color:=PAGECOLOR;
- with WizardBitmapImage do begin
- Parent:=WizardForm
- Left:=0
- Top:=60
- Width:=190
- Height:=391
- end
- with WelcomeLabel2 do begin
- Left:=35
- Top:=171
- Width:=465
- Height:=200
- end
- with WelcomeLabel1 do begin
- Left:=35
- Top:=131
- Width:=465
- Height:=28
- Font.Size:=8
- Font.Color:=$ffffff
- end
- end
- with InnerPage do begin
- with InnerNotebook do begin
- Left:=20
- Top:=20
- Width:=465
- Height:=354
- Color:=PAGECOLOR;
- with LicensePage do begin
- with LicenseNotAcceptedRadio do begin
- Left:=0
- Top:=338
- Width:=17
- Height:=17
- OnClick:=@LicenceNotAcceptedRadioOnClick;
- end
- with LicenseAcceptedRadio do begin
- Left:=0
- Top:=318
- Width:=17
- Height:=17
- OnClick:=@LicenceAcceptedRadioOnClick;
- end
- with LicenseMemo do begin
- Left:=0
- Top:=38
- Width:=465
- Height:=266
- end
- with LicenseLabel1 do begin
- Left:=0
- Top:=0
- Width:=465
- Height:=28
- end
- end
- with PasswordPage do begin
- with PasswordEdit do begin
- Left:=0
- Top:=50
- Width:=465
- Height:=21
- Color:=$ffffff
- Font.Color:=$000000
- end
- with PasswordEditLabel do begin
- Left:=0
- Top:=34
- Width:=465
- Height:=14
- end
- with PasswordLabel do begin
- Left:=0
- Top:=0
- Width:=465
- Height:=28
- end
- end
- with InfoBeforePage do begin
- with InfoBeforeMemo do begin
- Left:=0
- Top:=24
- Width:=465
- Height:=327
- end
- with InfoBeforeClickLabel do begin
- Left:=0
- Top:=0
- Width:=465
- Height:=14
- end
- end
- with UserInfoPage do begin
- with UserInfoSerialEdit do begin
- Left:=0
- Top:=120
- Width:=465
- Height:=21
- Color:=$ffffff
- Font.Color:=$000000
- end
- with UserInfoSerialLabel do begin
- Left:=0
- Top:=104
- Width:=465
- Height:=14
- end
- with UserInfoOrgEdit do begin
- Left:=0
- Top:=68
- Width:=465
- Height:=21
- Color:=$ffffff
- Font.Color:=$000000
- end
- with UserInfoOrgLabel do begin
- Left:=0
- Top:=52
- Width:=465
- Height:=14
- end
- with UserInfoNameEdit do begin
- Left:=0
- Top:=16
- Width:=465
- Height:=21
- Color:=$ffffff
- Font.Color:=$000000
- end
- with UserInfoNameLabel do begin
- Left:=0
- Top:=0
- Width:=465
- Height:=14
- end
- end
- with SelectDirPage do begin
- with DiskSpaceLabel do begin
- Left:=0
- Top:=340
- Width:=465
- Height:=14
- end
- with DirBrowseButton do begin
- Left:=368
- Top:=288
- Width:=BUTTONWIDTH;
- Height:=BUTTONHEIGHT;
- end
- with DirEdit do begin
- Left:=0
- Top:=290
- Width:=350
- Height:=21
- Color:=$ffffff
- Font.Color:=$000000
- end
- with SelectDirBrowseLabel do begin
- Left:=0
- Top:=24
- Width:=465
- Height:=28
- end
- with SelectDirLabel do begin
- Left:=0
- Top:=0
- Width:=465
- Height:=14
- end
- end
- with SelectComponentsPage do begin
- with ComponentsDiskSpaceLabel do begin
- Left:=0
- Top:=340
- Width:=417
- Height:=14
- end
- with ComponentsList do begin
- Left:=0
- Top:=62
- Width:=465
- Height:=261
- Color:=$ffffff
- Font.Color:=$000000
- end
- with TypesCombo do begin
- Left:=0
- Top:=38
- Width:=465
- Height:=21
- Color:=$ffffff
- Font.Color:=$000000
- ItemIndex:=TypesComboItemIndex;
- end
- with SelectComponentsLabel do begin
- Left:=0
- Top:=0
- Width:=465
- Height:=28
- end
- end
- with SelectProgramGroupPage do begin
- with NoIconsCheck do begin
- Left:=0
- Top:=337
- Width:=17
- Height:=17
- Visible:=True
- end
- with GroupBrowseButton do begin
- Left:=368
- Top:=288
- Width:=BUTTONWIDTH;
- Height:=BUTTONHEIGHT;
- end
- with GroupEdit do begin
- Left:=0
- Top:=290
- Width:=350
- Height:=21
- Color:=$ffffff
- Font.Color:=$000000
- end
- with SelectStartMenuFolderBrowseLabel do begin
- Left:=0
- Top:=24
- Width:=465
- Height:=28
- end
- with SelectStartMenuFolderLabel do begin
- Left:=0
- Top:=0
- Width:=465
- Height:=14
- end
- end
- with SelectTasksPage do begin
- with TasksList do begin
- Left:=0
- Top:=34
- Width:=465
- Height:=317
- Color:=PAGECOLOR;
- end
- with SelectTasksLabel do begin
- Left:=0
- Top:=0
- Width:=465
- Height:=28
- end
- end
- with ReadyPage do begin
- with ReadyMemo do begin
- Left:=0
- Top:=34
- Width:=465
- Height:=317
- Color:=PAGECOLOR;
- //Color:=$ffffff
- //Font.Color:=$000000
- end
- with ReadyLabel do begin
- Left:=0
- Top:=0
- Width:=465
- Height:=28
- end
- end
- with InstallingPage do begin
- with FilenameLabel do begin
- Left:=0+10
- Top:=16+10
- Width:=465
- Height:=16
- end
- with StatusLabel do begin
- Left:=0+10
- Top:=0+10
- Width:=465
- Height:=16
- end
- with ProgressGauge do begin
- Left:=0+10
- Top:=42+10
- Width:=465
- Height:=21
- end
- with WebDownloadFilenameLabel do begin
- Left:=0+10
- Top:=16+10+80
- Width:=465
- Height:=16
- end
- with WebDownloadStatusLabel do begin
- Left:=0+10
- Top:=0+10+80
- Width:=465
- Height:=16
- end
- with WebDownloadProgressGauge do begin
- Left:=0+10
- Top:=42+10+80
- Width:=465
- Height:=21
- end
- end
- with InfoAfterPage do begin
- with InfoAfterMemo do begin
- Left:=0
- Top:=24
- Width:=465
- Height:=327
- end
- with InfoAfterClickLabel do begin
- Left:=0
- Top:=0
- Width:=465
- Height:=14
- end
- end
- end
- with MainPanel do begin
- Parent:=WizardForm;
- color:=MAINPANELCOLOR;
- Left:=0
- Top:=0
- Width:=690
- Height:=60
- with WizardSmallBitmapImage do begin
- Left:=0
- Top:=58
- Width:=690
- Height:=2
- end
- with PageDescriptionLabel do begin
- Left:=25
- Top:=25
- Width:=500
- Height:=14
- Color:=MAINPANELCOLOR;
- Font.Color:=$ffffff
- end
- with PageNameLabel do begin
- Left:=15
- Top:=7
- Width:=500
- Height:=14
- Color:=MAINPANELCOLOR;
- Font.Color:=$ffffff
- end
- end
+ with WizardForm do begin
+ Position := poScreenCenter;
+ ClientWidth := 690
+ ClientHeight := 496
+ Font.Color := $ffffff
+ Font.Name := 'MS Sans Serif'
+ Font.Style := []
+ with CancelButton do begin
+ Left := 555
+ Top := 460
+ Width := BUTTONWIDTH;
+ Height := BUTTONHEIGHT;
end;
- with FinishedPage do begin
- Color:=PAGECOLOR;
- WizardBitmapImage2.hide;
- with NoRadio do begin
- Left:=35
- Top:=168
- Width:=465
- Height:=17
- end
- with YesRadio do begin
- Left:=35
- Top:=140
- Width:=465
- Height:=17
- end
- with RunList do begin
- Left:=35
- Top:=140
- Width:=465
- Height:=149
- end
- with FinishedLabel do begin
- Left:=35
- Top:=60
- Width:=465
- Height:=53
- end
- with FinishedHeadingLabel do begin
- Left:=35
- Top:=20
- Width:=465
- Height:=24
- Font.Size:=8
- Font.Color:=$ffffff
- end
+ with NextButton do begin
+ Left := 371
+ Top := 460
+ Width := BUTTONWIDTH;
+ Height := BUTTONHEIGHT;
end;
+ with BackButton do begin
+ Left := 266
+ Top := 460
+ Width := BUTTONWIDTH;
+ Height := BUTTONHEIGHT;
+ end;
+
+ with OuterNotebook do begin
+ Left := 190
+ Top := 59
+ Width := 500
+ Height := 392
+ with WelcomePage do begin
+ Color := PAGECOLOR;
+ with WizardBitmapImage do begin
+ Parent := WizardForm
+ Left := 0
+ Top := 60
+ Width := 190
+ Height := 391
+ end;
+ with WelcomeLabel2 do begin
+ Left := 35
+ Top := 171
+ Width := 465
+ Height := 200
+ end;
+ with WelcomeLabel1 do begin
+ Left := 35
+ Top := 131
+ Width := 465
+ Height := 28
+ Font.Size := 8
+ Font.Color := $ffffff
+ end;
+ end;
+ with InnerPage do begin
+ with InnerNotebook do begin
+ Left := 20
+ Top := 20
+ Width := 465
+ Height := 354
+ Color := PAGECOLOR;
+ with LicensePage do begin
+ with LicenseNotAcceptedRadio do begin
+ Left := 0
+ Top := 338
+ Width := 17
+ Height := 17
+ OnClick := @LicenceNotAcceptedRadioOnClick;
+ end;
+ with LicenseAcceptedRadio do begin
+ Left := 0
+ Top := 318
+ Width := 17
+ Height := 17
+ OnClick := @LicenceAcceptedRadioOnClick;
+ end;
+ with LicenseMemo do begin
+ Left := 0
+ Top := 38
+ Width := 465
+ Height := 266
+ end;
+ with LicenseLabel1 do begin
+ Left := 0
+ Top := 0
+ Width := 465
+ Height := 28
+ end;
+ end;
+ with PasswordPage do begin
+ with PasswordEdit do begin
+ Left := 0
+ Top := 50
+ Width := 465
+ Height := 21
+ Color := $ffffff
+ Font.Color := $000000
+ end;
+ with PasswordEditLabel do begin
+ Left := 0
+ Top := 34
+ Width := 465
+ Height := 14
+ end;
+ with PasswordLabel do begin
+ Left := 0
+ Top := 0
+ Width := 465
+ Height := 28
+ end;
+ end;
+ with InfoBeforePage do begin
+ with InfoBeforeMemo do begin
+ Left := 0
+ Top := 24
+ Width := 465
+ Height := 327
+ end;
+ with InfoBeforeClickLabel do begin
+ Left := 0
+ Top := 0
+ Width := 465
+ Height := 14
+ end;
+ end;
+ with UserInfoPage do begin
+ with UserInfoSerialEdit do begin
+ Left := 0
+ Top := 120
+ Width := 465
+ Height := 21
+ Color := $ffffff
+ Font.Color := $000000
+ end;
+ with UserInfoSerialLabel do begin
+ Left := 0
+ Top := 104
+ Width := 465
+ Height := 14
+ end;
+ with UserInfoOrgEdit do begin
+ Left := 0
+ Top := 68
+ Width := 465
+ Height := 21
+ Color := $ffffff
+ Font.Color := $000000
+ end;
+ with UserInfoOrgLabel do begin
+ Left := 0
+ Top := 52
+ Width := 465
+ Height := 14
+ end;
+ with UserInfoNameEdit do begin
+ Left := 0
+ Top := 16
+ Width := 465
+ Height := 21
+ Color := $ffffff
+ Font.Color := $000000
+ end;
+ with UserInfoNameLabel do begin
+ Left := 0
+ Top := 0
+ Width := 465
+ Height := 14
+ end;
+ end;
+ with SelectDirPage do begin
+ with DiskSpaceLabel do begin
+ Left := 0
+ Top := 340
+ Width := 465
+ Height := 14
+ end;
+ with DirBrowseButton do begin
+ Left := 368
+ Top := 288
+ Width := BUTTONWIDTH;
+ Height := BUTTONHEIGHT;
+ end;
+ with DirEdit do begin
+ Left := 0
+ Top := 290
+ Width := 350
+ Height := 21
+ Color := $ffffff
+ Font.Color := $000000
+ end;
+ with SelectDirBrowseLabel do begin
+ Left := 0
+ Top := 24
+ Width := 465
+ Height := 28
+ end;
+ with SelectDirLabel do begin
+ Left := 0
+ Top := 0
+ Width := 465
+ Height := 14
+ end;
+ end;
+ with SelectComponentsPage do begin
+ with ComponentsDiskSpaceLabel do begin
+ Left := 0
+ Top := 340
+ Width := 417
+ Height := 14
+ end;
+ with ComponentsList do begin
+ Left := 0
+ Top := 62
+ Width := 465
+ Height := 261
+ Color := $ffffff
+ Font.Color := $000000
+ end;
+ with TypesCombo do begin
+ Left := 0
+ Top := 38
+ Width := 465
+ Height := 21
+ Color := $ffffff
+ Font.Color := $000000
+ ItemIndex := TypesComboItemIndex;
+ end;
+ with SelectComponentsLabel do begin
+ Left := 0
+ Top := 0
+ Width := 465
+ Height := 28
+ end;
+ end;
+ with SelectProgramGroupPage do begin
+ with NoIconsCheck do begin
+ Left := 0
+ Top := 337
+ Width := 17
+ Height := 17
+ Visible := True
+ end;
+ with GroupBrowseButton do begin
+ Left := 368
+ Top := 288
+ Width := BUTTONWIDTH;
+ Height := BUTTONHEIGHT;
+ end;
+ with GroupEdit do begin
+ Left := 0
+ Top := 290
+ Width := 350
+ Height := 21
+ Color := $ffffff
+ Font.Color := $000000
+ end;
+ with SelectStartMenuFolderBrowseLabel do begin
+ Left := 0
+ Top := 24
+ Width := 465
+ Height := 28
+ end;
+ with SelectStartMenuFolderLabel do begin
+ Left := 0
+ Top := 0
+ Width := 465
+ Height := 14
+ end;
+ end;
+ with SelectTasksPage do begin
+ with TasksList do begin
+ Left := 0
+ Top := 34
+ Width := 465
+ Height := 317
+ Color := PAGECOLOR;
+ end;
+ with SelectTasksLabel do begin
+ Left := 0
+ Top := 0
+ Width := 465
+ Height := 28
+ end;
+ end;
+ with ReadyPage do begin
+ with ReadyMemo do begin
+ Left := 0
+ Top := 34
+ Width := 465
+ Height := 317
+ Color := PAGECOLOR;
+ //Color := $ffffff
+ //Font.Color := $000000
+ end;
+ with ReadyLabel do begin
+ Left := 0
+ Top := 0
+ Width := 465
+ Height := 28
+ end;
+ end;
+ with InstallingPage do begin
+ with FilenameLabel do begin
+ Left := 0+10
+ Top := 16+10
+ Width := 465
+ Height := 16
+ end;
+ with StatusLabel do begin
+ Left := 0+10
+ Top := 0+10
+ Width := 465
+ Height := 16
+ end;
+ with ProgressGauge do begin
+ Left := 0+10
+ Top := 42+10
+ Width := 465
+ Height := 21
+ end;
+ with WebDownloadFilenameLabel do begin
+ Left := 0+10
+ Top := 16+10+80
+ Width := 465
+ Height := 16
+ end;
+ with WebDownloadStatusLabel do begin
+ Left := 0+10
+ Top := 0+10+80
+ Width := 465
+ Height := 16
+ end;
+ with WebDownloadProgressGauge do begin
+ Left := 0+10
+ Top := 42+10+80
+ Width := 465
+ Height := 21
+ end;
+ end;
+ with InfoAfterPage do begin
+ with InfoAfterMemo do begin
+ Left := 0
+ Top := 24
+ Width := 465
+ Height := 327
+ end;
+ with InfoAfterClickLabel do begin
+ Left := 0
+ Top := 0
+ Width := 465
+ Height := 14
+ end;
+ end;
+ end;
+ with MainPanel do begin
+ Parent := WizardForm;
+ color := MAINPANELCOLOR;
+ Left := 0
+ Top := 0
+ Width := 690
+ Height := 60
+ with WizardSmallBitmapImage do begin
+ Left := 0
+ Top := 58
+ Width := 690
+ Height := 2
+ end;
+ with PageDescriptionLabel do begin
+ Left := 25
+ Top := 25
+ Width := 500
+ Height := 14
+ Color := MAINPANELCOLOR;
+ Font.Color := $ffffff
+ end;
+ with PageNameLabel do begin
+ Left := 15
+ Top := 7
+ Width := 500
+ Height := 14
+ Color := MAINPANELCOLOR;
+ Font.Color := $ffffff
+ end;
+ end;
+ end;
+ with FinishedPage do begin
+ Color := PAGECOLOR;
+ WizardBitmapImage2.hide;
+ with NoRadio do begin
+ Left := 35
+ Top := 168
+ Width := 465
+ Height := 17
+ end;
+ with YesRadio do begin
+ Left := 35
+ Top := 140
+ Width := 465
+ Height := 17
+ end;
+ with RunList do begin
+ Left := 35
+ Top := 140
+ Width := 465
+ Height := 149
+ end;
+ with FinishedLabel do begin
+ Left := 35
+ Top := 60
+ Width := 465
+ Height := 53
+ end;
+ with FinishedHeadingLabel do begin
+ Left := 35
+ Top := 20
+ Width := 465
+ Height := 24
+ Font.Size := 8
+ Font.Color := $ffffff
+ end;
+ end;
+ end;
end;
-end;
-with TLabel.Create(WizardForm) do begin
- Left:=17
- Top:=320
- Width:=445
- Height:=17
- Color:=clWhite;
- Transparent:=true;
- Caption:=WizardForm.LicenseAcceptedRadio.Caption
- Parent:=WizardForm.LicensePage
-end;
-with TLabel.Create(WizardForm) do begin
- Left:=17
- Top:=320
- Width:=445
- Height:=17
- Color:=clWhite;
- Transparent:=true;
- Caption:=WizardForm.LicenseAcceptedRadio.Caption
- Parent:=WizardForm.LicensePage
-end;
-with TLabel.Create(WizardForm) do begin
- Left:=17
- Top:=340
- Width:=445
- Height:=17
- Color:=clWhite;
- Transparent:=true;
- Caption:=WizardForm.LicenseNotAcceptedRadio.Caption
- Parent:=WizardForm.LicensePage
-end
-with TLabel.Create(WizardForm) do begin
- Left:=17
- Top:=340
- Width:=445
- Height:=17
- Color:=clWhite;
- Transparent:=true;
- Caption:=WizardForm.NoIconsCheck.Caption
- Parent:=WizardForm.SelectProgramGroupPage
-end
+ with TLabel.Create(WizardForm) do begin
+ Left := 17
+ Top := 320
+ Width := 445
+ Height := 17
+ Color := clWhite;
+ Transparent := true;
+ Caption := WizardForm.LicenseAcceptedRadio.Caption
+ Parent := WizardForm.LicensePage
+ end;
+ with TLabel.Create(WizardForm) do begin
+ Left := 17
+ Top := 320
+ Width := 445
+ Height := 17
+ Color := clWhite;
+ Transparent := true;
+ Caption := WizardForm.LicenseAcceptedRadio.Caption
+ Parent := WizardForm.LicensePage
+ end;
+ with TLabel.Create(WizardForm) do begin
+ Left := 17
+ Top := 340
+ Width := 445
+ Height := 17
+ Color := clWhite;
+ Transparent := true;
+ Caption := WizardForm.LicenseNotAcceptedRadio.Caption
+ Parent := WizardForm.LicensePage
+ end;
+ with TLabel.Create(WizardForm) do begin
+ Left := 17
+ Top := 340
+ Width := 445
+ Height := 17
+ Color := clWhite;
+ Transparent := true;
+ Caption := WizardForm.NoIconsCheck.Caption
+ Parent := WizardForm.SelectProgramGroupPage
+ end;
ExtractTemporaryFile(ExtractFileName('{#MyWizardButtonImageFile}'));
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
|
|
From: <ah...@us...> - 2012-08-11 23:20:16
|
Revision: 13392
http://jvcl.svn.sourceforge.net/jvcl/?rev=13392&view=rev
Author: ahuser
Date: 2012-08-11 23:20:08 +0000 (Sat, 11 Aug 2012)
Log Message:
-----------
* Mantis #5949: JVCL Controls issues with VCL Styles enabled
* Style-Engine workarounds for TJvSpeedButton, TJvStatusBar, PerformEraseBackground
* PaintEdit uses the dictated color settings fromt he Style-Engine
Modified Paths:
--------------
trunk/jvcl/run/JvBaseEdits.pas
trunk/jvcl/run/JvLabel.pas
trunk/jvcl/run/JvSpeedButton.pas
trunk/jvcl/run/JvStatusBar.pas
trunk/jvcl/run/JvThemes.pas
trunk/jvcl/run/JvToolEdit.pas
Modified: trunk/jvcl/run/JvBaseEdits.pas
===================================================================
--- trunk/jvcl/run/JvBaseEdits.pas 2012-08-11 23:01:38 UTC (rev 13391)
+++ trunk/jvcl/run/JvBaseEdits.pas 2012-08-11 23:20:08 UTC (rev 13392)
@@ -319,7 +319,6 @@
uses
SysUtils, Math, Graphics,
-// JclLogic,
JvJCLUtils, JvCalc, JvConsts, JvResources, JclSysUtils;
{$R JvBaseEdits.Res}
@@ -932,7 +931,6 @@
Invalidate;
end;
-
procedure TJvCustomNumEdit.WMPaint(var Msg: TWMPaint);
var
S: string;
@@ -946,9 +944,6 @@
inherited;
end;
-
-
-
procedure TJvCustomNumEdit.FontChanged;
begin
inherited FontChanged;
@@ -1029,7 +1024,6 @@
begin
Bmp := TBitmap.Create;
try
- //Bmp.Handle := LoadBitmap(HInstance, sCalcBmp);
Bmp.LoadFromResourceName(HInstance, sCalcBmp);
GCalcImageIndex := DefaultImages.AddMasked(Bmp, clFuchsia);
finally
Modified: trunk/jvcl/run/JvLabel.pas
===================================================================
--- trunk/jvcl/run/JvLabel.pas 2012-08-11 23:01:38 UTC (rev 13391)
+++ trunk/jvcl/run/JvLabel.pas 2012-08-11 23:20:08 UTC (rev 13392)
@@ -498,7 +498,7 @@
FChangeLink.OnChange := DoImagesChange;
ControlStyle := ControlStyle + [csOpaque, csReplicatable];
{$IFDEF JVCLThemesEnabled}
- if ThemeServices.{$IFDEF RTL230_UP}Enabled{$ELSE}ThemesEnabled{$ENDIF RTL230_UP} then
+ if ThemeServices.Enabled then
ControlStyle := ControlStyle - [csOpaque];
{$ENDIF JVCLThemesEnabled}
@@ -1065,7 +1065,7 @@
if Transparent <> Value then
begin
{$IFDEF JVCLThemesEnabled}
- if ThemeServices.{$IFDEF RTL230_UP}Enabled{$ELSE}ThemesEnabled{$ENDIF RTL230_UP} then
+ if ThemeServices.Enabled then
Value := True; // themes aware Labels are always transparent
{$ENDIF JVCLThemesEnabled}
if Value then
@@ -1198,7 +1198,7 @@
NeedRepaint := not Transparent and
(
{$IFDEF JVCLThemesEnabled}
- ThemeServices.{$IFDEF RTL230_UP}Enabled{$ELSE}ThemesEnabled{$ENDIF RTL230_UP} or
+ ThemeServices.Enabled or
{$ENDIF JVCLThemesEnabled}
(FHotTrack and not (FDragging or OtherDragging)));
@@ -1225,7 +1225,7 @@
NeedRepaint := not Transparent and
(
{$IFDEF JVCLThemesEnabled}
- ThemeServices.{$IFDEF RTL230_UP}Enabled{$ELSE}ThemesEnabled{$ENDIF RTL230_UP} or
+ ThemeServices.Enabled or
{$ENDIF JVCLThemesEnabled}
(FHotTrack and (FDragging or not OtherDragging)));
Modified: trunk/jvcl/run/JvSpeedButton.pas
===================================================================
--- trunk/jvcl/run/JvSpeedButton.pas 2012-08-11 23:01:38 UTC (rev 13391)
+++ trunk/jvcl/run/JvSpeedButton.pas 2012-08-11 23:20:08 UTC (rev 13392)
@@ -1225,7 +1225,7 @@
PaintRect := Rect(0, 0, Width, Height);
{$IFDEF JVCLThemesEnabled}
- if ThemeServices.{$IFDEF RTL230_UP}Enabled{$ELSE}ThemesEnabled{$ENDIF RTL230_UP} then
+ if ThemeServices.Enabled then
begin
if ControlInGlassPaint(Self) then
FillRect(Canvas.Handle, ClientRect, GetStockObject(BLACK_BRUSH))
Modified: trunk/jvcl/run/JvStatusBar.pas
===================================================================
--- trunk/jvcl/run/JvStatusBar.pas 2012-08-11 23:01:38 UTC (rev 13391)
+++ trunk/jvcl/run/JvStatusBar.pas 2012-08-11 23:20:08 UTC (rev 13392)
@@ -74,6 +74,9 @@
procedure MovePanelControls;
function GetPanelClass: TStatusPanelClass; override;
procedure SBSetParts(var msg: TMessage); message SB_SETPARTS;
+ {$IFDEF COMPILER16_UP}
+ procedure WndProc(var Msg: TMessage); override;
+ {$ENDIF COMPILER16_UP}
public
constructor Create(AOwner: TComponent); override;
function ExecuteAction(Action: TBasicAction): Boolean; override;
@@ -246,6 +249,61 @@
MovePanelControls;
end;
+{$IFDEF COMPILER16_UP}
+procedure TJvStatusBar.WndProc(var Msg: TMessage);
+var
+ DC, PaintDC: HDC;
+ Buffer: TBitmap;
+ PS: TPaintStruct;
+begin
+ // TStatusBarStyleHook.Paint catches all WM_PAINT but doesn't call Control.PaintControls()
+ // what causes TGraphicControls to not be painted. With this code we call the PaintControls
+ // function in that case.
+ // TODO: When this bug gets fixed in a later Delphi version, the IFDEFs must be adjusted.
+ if (Msg.Msg = WM_PAINT) and StyleServices.Enabled and not StyleServices.IsSystemStyle then
+ begin
+ DC := HDC(Msg.WParam);
+ if DoubleBuffered and (DC = 0) then
+ begin
+ PaintDC := BeginPaint(Handle, PS);
+ try
+ Buffer := TBitmap.Create;
+ try
+ Buffer.SetSize(Width, Height);
+ Msg.WParam := WPARAM(Buffer.Canvas.Handle);
+ inherited WndProc(Msg);
+ Msg.WParam := WPARAM(DC);
+ PaintControls(Buffer.Canvas.Handle, nil);
+ BitBlt(PaintDC, 0, 0, Buffer.Width, Buffer.Height, Buffer.Canvas.Handle, 0, 0, SRCCOPY);
+ finally
+ Buffer.Free;
+ end;
+ finally
+ EndPaint(Handle, PS);
+ end;
+ end
+ else
+ begin
+ if DC <> 0 then
+ PaintDC := DC
+ else
+ PaintDC := BeginPaint(Handle, PS);
+ try
+ Msg.WParam := WPARAM(PaintDC);
+ inherited WndProc(Msg);
+ Msg.WParam := WPARAM(DC);
+ PaintControls(PaintDC, nil);
+ finally
+ if DC = 0 then
+ EndPaint(Handle, PS);
+ end;
+ end;
+ end
+ else
+ inherited WndProc(Msg);
+end;
+{$ENDIF COMPILER16_UP}
+
//=== { TJvStatusPanel } =====================================================
type
Modified: trunk/jvcl/run/JvThemes.pas
===================================================================
--- trunk/jvcl/run/JvThemes.pas 2012-08-11 23:01:38 UTC (rev 13391)
+++ trunk/jvcl/run/JvThemes.pas 2012-08-11 23:20:08 UTC (rev 13392)
@@ -91,7 +91,7 @@
PThemedElementDetails = {$IFDEF COMPILER7_UP}Themes{$ELSE}ThemeSrv{$ENDIF}.PThemedElementDetails; {$EXTERNALSYM PThemedElementDetails}
TThemedElementDetails = {$IFDEF COMPILER7_UP}Themes{$ELSE}ThemeSrv{$ENDIF}.TThemedElementDetails; {$EXTERNALSYM TThemedElementDetails}
{$IFDEF COMPILER16_UP}
- TThemeServices = {$IFDEF COMPILER7_UP}Themes{$ELSE}ThemeSrv{$ENDIF}.TCustomStyleServices; {$EXTERNALSYM TThemeServices}
+ TThemeServices = Themes.TCustomStyleServices; {$EXTERNALSYM TThemeServices}
{$ELSE}
TThemeServices = {$IFDEF COMPILER7_UP}Themes{$ELSE}ThemeSrv{$ENDIF}.TThemeServices; {$EXTERNALSYM TThemeServices}
{$ENDIF COMPILER16_UP}
@@ -726,10 +726,13 @@
{$IFNDEF COMPILER16_UP}
function GetElementContentRect(DC: HDC; Details: TThemedElementDetails;
const BoundingRect: TRect; out AContentRect: TRect): Boolean;
+ function IsSystemStyle: Boolean;
+ function Enabled: Boolean;
{$ENDIF ~COMPILER16_UP}
end;
function ThemeServices: TThemeServicesEx;
+function StyleServices: TThemeServicesEx;
{ PaintControlBorder paints the themed border for WinControls only when they
have the WS_EX_CLIENTEDGE. }
@@ -808,7 +811,6 @@
procedure DrawGlassableImageList(ImageList: HIMAGELIST; Index: Integer; Dest: HDC; X, Y: Integer;
Style: UINT; PaintOnGlass: Boolean = False);
-
{$IFDEF UNITVERSIONING}
const
UnitVersioning: TUnitVersionInfo = (
@@ -844,7 +846,7 @@
Cl: TColor;
begin
{$IFDEF JVCLThemesEnabled}
- if ThemeServices.{$IFDEF RTL230_UP}Enabled{$ELSE}ThemesEnabled{$ENDIF RTL230_UP} and
+ if ThemeServices.Enabled and
(Control.Parent <> nil) and
((Color = TWinControlThemeInfo(Control.Parent).Color) or
(ColorToRGB(Color) = ColorToRGB(TWinControlThemeInfo(Control.Parent).Color))) and
@@ -882,7 +884,7 @@
begin
{$IFDEF JVCLThemesEnabled}
GetObject(Brush, SizeOf(LogBrush), @LogBrush);
- if ThemeServices.{$IFDEF RTL230_UP}Enabled{$ELSE}ThemesEnabled{$ENDIF RTL230_UP} and
+ if ThemeServices.Enabled and
(Control.Parent <> nil) and
(LogBrush.lbColor = Cardinal(ColorToRGB(TWinControlThemeInfo(Control.Parent).Color))) and
((not NeedsParentBackground) or
@@ -917,7 +919,7 @@
begin
Result := False;
{$IFDEF JVCLThemesEnabled}
- if ThemeServices.{$IFDEF RTL230_UP}Enabled{$ELSE}ThemesEnabled{$ENDIF RTL230_UP} then
+ if ThemeServices.Enabled then
begin
R := Rect;
case uType of
@@ -1141,6 +1143,13 @@
var
WindowOrg: TPoint;
OrgRgn, Rgn: THandle;
+ {$IFDEF COMPILER16_UP}
+ OldPen: HPEN;
+ OldBrush: HBRUSH;
+ OldFont: HFONT;
+ OldTextColor: TColorRef;
+ OldBkMode: Integer;
+ {$ENDIF COMPILER16_UP}
begin
if Control.Parent <> nil then
begin
@@ -1168,7 +1177,42 @@
end;
try
+ {$IFDEF COMPILER16_UP}
+ // Delphi XE2's Style-Engine has a bug in the TStyleHook.WMEraseBkgnd that replaces the
+ // selected GDI objects with the TCanvas default objects ("System" font, ...).
+ // We need to repair the damage in order to have the same behavior of the native theming API.
+ // General rule for WM_ERASEBKGND: Return the DC in the state in that it was when the function
+ // was called.
+ OldPen := 0;
+ OldBrush := 0;
+ OldFont := 0;
+ OldTextColor := 0;
+ OldBkMode := 0;
+ if StyleServices.Enabled and not StyleServices.IsSystemStyle then
+ begin
+ OldPen := GetCurrentObject(DC, OBJ_PEN);
+ OldBrush := GetCurrentObject(DC, OBJ_BRUSH);
+ OldFont := GetCurrentObject(DC, OBJ_FONT);
+ OldTextColor := GetTextColor(DC);
+ OldBkMode := GetBkMode(DC);
+ end;
+ {$ENDIF COMPILER16_UP}
Control.Parent.Perform(WM_ERASEBKGND, DC, DC); // force redraw
+ {$IFDEF COMPILER16_UP}
+ if StyleServices.Enabled and not StyleServices.IsSystemStyle then
+ begin
+ if GetCurrentObject(DC, OBJ_PEN) <> OldPen then
+ SelectObject(DC, OldPen);
+ if GetCurrentObject(DC, OBJ_BRUSH) <> OldBrush then
+ SelectObject(DC, OldBrush);
+ if GetCurrentObject(DC, OBJ_FONT) <> OldFont then
+ SelectObject(DC, OldFont);
+ if GetTextColor(DC) <> OldTextColor then
+ SetTextColor(DC, OldTextColor);
+ if GetBkMode(DC) <> OldBkMode then
+ SetBkMode(DC, OldBkMode);
+ end;
+ {$ENDIF COMPILER16_UP}
finally
if (Offset.X <> 0) and (Offset.Y <> 0) then
SetWindowOrgEx(DC, WindowOrg.X, WindowOrg.Y, nil);
@@ -1202,7 +1246,7 @@
{$ENDIF JVCLThemesEnabled}
begin
{$IFDEF JVCLThemesEnabled}
- if (Style <> bsWin31) and ThemeServices.{$IFDEF RTL230_UP}Enabled{$ELSE}ThemesEnabled{$ENDIF RTL230_UP} then
+ if (Style <> bsWin31) and ThemeServices.Enabled then
begin
Result := Client;
@@ -1305,7 +1349,7 @@
{$ENDIF COMPILER11_UP}
begin
{$IFDEF COMPILER11_UP}
- if ThemeServices.{$IFDEF RTL230_UP}Enabled{$ELSE}ThemesEnabled{$ENDIF RTL230_UP} and CheckWin32Version(6, 0) then
+ if ThemeServices.Enabled and CheckWin32Version(6, 0) then
begin
FillChar(Options, SizeOf(Options), 0);
Options.dwSize := SizeOf(Options);
@@ -1316,18 +1360,31 @@
Options.dwFlags := Options.dwFlags or DTT_TEXTCOLOR;
Options.crText := GetTextColor(DC);
- {$IFDEF COMPILER12_UP}
- with ThemeServices do
- if DrawThemeTextEx(Theme[teToolBar], DC, TP_BUTTON, TS_NORMAL, PWideChar(Text), Length(Text),
- TextFlags, TextRect, Options) <> E_NOTIMPL then
- Exit;
- {$ELSE}
- S := Text;
- with ThemeServices do
- if DrawThemeTextEx(Theme[teToolBar], DC, TP_BUTTON, TS_NORMAL, PWideChar(S), Length(S),
- TextFlags, @TextRect, Options) <> E_NOTIMPL then
- Exit;
- {$ENDIF COMPILER12_UP}
+ {$IFDEF COMPILER16_UP}
+ if not StyleServices.IsSystemStyle then
+ begin
+ // The Style engine doesn't have DrawThemeTextEx support
+ {$WARNINGS OFF} // ignore "deprecated" warning
+ StyleServices.DrawText(DC, StyleServices.GetElementDetails(tbPushButtonNormal), Text, TextRect, TextFlags, 0);
+ {$WARNINGS ON}
+ Exit;
+ end
+ else
+ {$ENDIF}
+ begin
+ {$IFDEF COMPILER12_UP}
+ with ThemeServices do
+ if DrawThemeTextEx(Theme[teToolBar], DC, TP_BUTTON, TS_NORMAL, PWideChar(Text), Length(Text),
+ TextFlags, TextRect, Options) <> E_NOTIMPL then
+ Exit;
+ {$ELSE}
+ S := Text;
+ with ThemeServices do
+ if DrawThemeTextEx(Theme[teToolBar], DC, TP_BUTTON, TS_NORMAL, PWideChar(S), Length(S),
+ TextFlags, @TextRect, Options) <> E_NOTIMPL then
+ Exit;
+ {$ENDIF COMPILER12_UP}
+ end;
end;
{$ENDIF COMPILER11_UP}
Windows.DrawText(DC, PChar(Text), Length(Text), TextRect, TextFlags);
@@ -1401,6 +1458,16 @@
AContentRect := ContentRect(DC, Details, BoundingRect);
Result := True;
end;
+
+function TThemeServicesEx.IsSystemStyle: Boolean;
+begin
+ Result := True;
+end;
+
+function TThemeServicesEx.Enabled: Boolean;
+begin
+ Result := ThemesEnabled;
+end;
{$ENDIF ~COMPILER16_UP}
function ThemeServices: TThemeServicesEx;
@@ -1409,6 +1476,12 @@
{$IFDEF COMPILER7_UP}Themes{$ELSE}ThemeSrv{$ENDIF}.{$IFDEF RTL230_UP}StyleServices{$ELSE}ThemeServices{$ENDIF RTL230_UP});
end;
+function StyleServices: TThemeServicesEx;
+begin
+ Result := TThemeServicesEx(
+ {$IFDEF COMPILER7_UP}Themes{$ELSE}ThemeSrv{$ENDIF}.{$IFDEF RTL230_UP}StyleServices{$ELSE}ThemeServices{$ENDIF RTL230_UP});
+end;
+
procedure PaintControlBorder(Control: TWinControl);
begin
ThemeServices.PaintBorder(TWinControl(Control), False)
Modified: trunk/jvcl/run/JvToolEdit.pas
===================================================================
--- trunk/jvcl/run/JvToolEdit.pas 2012-08-11 23:01:38 UTC (rev 13391)
+++ trunk/jvcl/run/JvToolEdit.pas 2012-08-11 23:20:08 UTC (rev 13392)
@@ -1119,6 +1119,9 @@
uses
RTLConsts, Math, MaskUtils,
MultiMon,
+ {$IFDEF COMPILER16_UP}
+ Vcl.Themes,
+ {$ENDIF COMPILER16_UP}
JclFileUtils, JclStrings,
JvPickDate, JvJCLUtils, JvJVCLUtils,
JvThemes, JvResources, JclSysUtils;
@@ -1386,6 +1389,10 @@
AlignStyle: array [Boolean, TAlignment] of DWORD =
((WS_EX_LEFT, WS_EX_RIGHT, WS_EX_LEFT),
(WS_EX_RIGHT, WS_EX_LEFT, WS_EX_LEFT));
+ {$IFDEF COMPILER16_UP}
+ ColorStates: array[Boolean] of TStyleColor = (scEditDisabled, scEdit);
+ FontColorStates: array[Boolean] of TStyleFont = (sfEditBoxTextDisabled, sfEditBoxTextNormal);
+ {$ENDIF COMPILER16_UP}
var
LTextWidth, X: Integer;
EditRect: TRect;
@@ -1401,16 +1408,14 @@
ChangeBiDiModeAlignment(AAlignment);
if StandardPaint and not (csPaintCopy in TEd(Editor).ControlState) then
begin
- if SysLocale.MiddleEast and TEd(Editor).HandleAllocated and (TEd(Editor).IsRightToLeft) then
+ if SysLocale.MiddleEast and TEd(Editor).HandleAllocated and TEd(Editor).IsRightToLeft then
begin { This keeps the right aligned text, right aligned }
- ExStyle := DWORD(GetWindowLong(TEd(Editor).Handle, GWL_EXSTYLE)) and (not WS_EX_RIGHT) and
- (not WS_EX_RTLREADING) and (not WS_EX_LEFTSCROLLBAR);
+ ExStyle := DWORD(GetWindowLong(TEd(Editor).Handle, GWL_EXSTYLE)) and not (WS_EX_RIGHT or WS_EX_RTLREADING or WS_EX_LEFTSCROLLBAR);
if TEd(Editor).UseRightToLeftReading then
ExStyle := ExStyle or WS_EX_RTLREADING;
if TEd(Editor).UseRightToLeftScrollBar then
ExStyle := ExStyle or WS_EX_LEFTSCROLLBAR;
- ExStyle := ExStyle or
- AlignStyle[TEd(Editor).UseRightToLeftAlignment, AAlignment];
+ ExStyle := ExStyle or AlignStyle[TEd(Editor).UseRightToLeftAlignment, AAlignment];
if DWORD(GetWindowLong(TEd(Editor).Handle, GWL_EXSTYLE)) <> ExStyle then
SetWindowLong(TEd(Editor).Handle, GWL_EXSTYLE, ExStyle);
end;
@@ -1465,7 +1470,15 @@
SaveDC(ACanvas.Handle);
try
ACanvas.Brush.Style := bsClear;
- ACanvas.Font.Color := DisabledTextColor;
+ {$IFDEF COMPILER16_UP}
+ if StyleServices.Enabled and not StyleServices.IsSystemStyle then
+ begin
+ ACanvas.Brush.Color := StyleServices.GetStyleColor(ColorStates[Editor.Enabled]);
+ ACanvas.Font.Color := StyleServices.GetStyleFontColor(FontColorStates[Editor.Enabled]);
+ end
+ else
+ {$ENDIF COMPILER16_UP}
+ ACanvas.Font.Color := DisabledTextColor;
ACanvas.TextRect(EditRect, X, EditRect.Top, S);
finally
RestoreDC(ACanvas.Handle, -1);
@@ -1473,7 +1486,15 @@
end
else
begin
- Brush.Color := TEd(Editor).Color;
+ {$IFDEF COMPILER16_UP}
+ if StyleServices.Enabled and not StyleServices.IsSystemStyle then
+ begin
+ ACanvas.Brush.Color := StyleServices.GetStyleColor(ColorStates[Editor.Enabled]);
+ ACanvas.Font.Color := StyleServices.GetStyleFontColor(FontColorStates[Editor.Enabled]);
+ end
+ else
+ {$ENDIF COMPILER16_UP}
+ Brush.Color := TEd(Editor).Color;
ACanvas.TextRect(EditRect, X, EditRect.Top, S);
end;
end;
@@ -2085,9 +2106,19 @@
Result := inherited DoEraseBackground(Canvas, Param)
else
begin
- Canvas.Brush.Color := FDisabledColor;
- Canvas.Brush.Style := bsSolid;
- Canvas.FillRect(ClientRect);
+ {$IFDEF COMPILER16_UP}
+ if StyleServices.Enabled and not StyleServices.IsSystemStyle then
+ begin
+ // Ignore FDisabldColor. The Style dictates the color
+ Result := inherited DoEraseBackground(Canvas, Param);
+ end
+ else
+ {$ENDIF COMPILER16_UP}
+ begin
+ Canvas.Brush.Color := FDisabledColor;
+ Canvas.Brush.Style := bsSolid;
+ Canvas.FillRect(ClientRect);
+ end;
end;
end;
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
|
|
From: <ou...@us...> - 2012-08-11 23:01:49
|
Revision: 13391
http://jvcl.svn.sourceforge.net/jvcl/?rev=13391&view=rev
Author: outchy
Date: 2012-08-11 23:01:38 +0000 (Sat, 11 Aug 2012)
Log Message:
-----------
The locale should always be "english (US)" for all packages.
Modified Paths:
--------------
trunk/jvcl/packages/d10/JvAppFrm.bdsproj
trunk/jvcl/packages/d10/JvAppFrmDesign.bdsproj
trunk/jvcl/packages/d10/JvBDE.bdsproj
trunk/jvcl/packages/d10/JvBDEDesign.bdsproj
trunk/jvcl/packages/d10/JvBands.bdsproj
trunk/jvcl/packages/d10/JvBandsDesign.bdsproj
trunk/jvcl/packages/d10/JvCmp.bdsproj
trunk/jvcl/packages/d10/JvCmpDesign.bdsproj
trunk/jvcl/packages/d10/JvControls.bdsproj
trunk/jvcl/packages/d10/JvControlsDesign.bdsproj
trunk/jvcl/packages/d10/JvCore.bdsproj
trunk/jvcl/packages/d10/JvCoreDesign.bdsproj
trunk/jvcl/packages/d10/JvCrypt.bdsproj
trunk/jvcl/packages/d10/JvCryptDesign.bdsproj
trunk/jvcl/packages/d10/JvCustom.bdsproj
trunk/jvcl/packages/d10/JvCustomDesign.bdsproj
trunk/jvcl/packages/d10/JvDB.bdsproj
trunk/jvcl/packages/d10/JvDBDesign.bdsproj
trunk/jvcl/packages/d10/JvDlgs.bdsproj
trunk/jvcl/packages/d10/JvDlgsDesign.bdsproj
trunk/jvcl/packages/d10/JvDocking.bdsproj
trunk/jvcl/packages/d10/JvDockingDesign.bdsproj
trunk/jvcl/packages/d10/JvDotNetCtrls.bdsproj
trunk/jvcl/packages/d10/JvDotNetCtrlsDesign.bdsproj
trunk/jvcl/packages/d10/JvGlobus.bdsproj
trunk/jvcl/packages/d10/JvGlobusDesign.bdsproj
trunk/jvcl/packages/d10/JvHMI.bdsproj
trunk/jvcl/packages/d10/JvHMIDesign.bdsproj
trunk/jvcl/packages/d10/JvJans.bdsproj
trunk/jvcl/packages/d10/JvJansDesign.bdsproj
trunk/jvcl/packages/d10/JvMM.bdsproj
trunk/jvcl/packages/d10/JvMMDesign.bdsproj
trunk/jvcl/packages/d10/JvManagedThreads.bdsproj
trunk/jvcl/packages/d10/JvManagedThreadsDesign.bdsproj
trunk/jvcl/packages/d10/JvNet.bdsproj
trunk/jvcl/packages/d10/JvNetDesign.bdsproj
trunk/jvcl/packages/d10/JvPageComps.bdsproj
trunk/jvcl/packages/d10/JvPageCompsDesign.bdsproj
trunk/jvcl/packages/d10/JvPascalInterpreter.bdsproj
trunk/jvcl/packages/d10/JvPascalInterpreterDesign.bdsproj
trunk/jvcl/packages/d10/JvPluginSystem.bdsproj
trunk/jvcl/packages/d10/JvPluginSystemDesign.bdsproj
trunk/jvcl/packages/d10/JvPrintPreview.bdsproj
trunk/jvcl/packages/d10/JvPrintPreviewDesign.bdsproj
trunk/jvcl/packages/d10/JvRuntimeDesign.bdsproj
trunk/jvcl/packages/d10/JvRuntimeDesignDesign.bdsproj
trunk/jvcl/packages/d10/JvStdCtrls.bdsproj
trunk/jvcl/packages/d10/JvStdCtrlsDesign.bdsproj
trunk/jvcl/packages/d10/JvSystem.bdsproj
trunk/jvcl/packages/d10/JvSystemDesign.bdsproj
trunk/jvcl/packages/d10/JvTimeFramework.bdsproj
trunk/jvcl/packages/d10/JvTimeFrameworkDesign.bdsproj
trunk/jvcl/packages/d10/JvWizards.bdsproj
trunk/jvcl/packages/d10/JvWizardsDesign.bdsproj
trunk/jvcl/packages/d10/JvXPCtrls.bdsproj
trunk/jvcl/packages/d10/JvXPCtrlsDesign.bdsproj
trunk/jvcl/packages/d10/template.bdsproj
trunk/jvcl/packages/d10per/JvCore.bdsproj
trunk/jvcl/packages/d10per/JvDotNetCtrls.bdsproj
trunk/jvcl/packages/d10per/JvGlobus.bdsproj
trunk/jvcl/packages/d10per/JvGlobusDesign.bdsproj
trunk/jvcl/packages/d10per/JvPascalInterpreter.bdsproj
trunk/jvcl/packages/d10per/JvPascalInterpreterDesign.bdsproj
trunk/jvcl/packages/d10per/JvRuntimeDesign.bdsproj
trunk/jvcl/packages/d11/JvAppFrm.dproj
trunk/jvcl/packages/d11/JvAppFrmDesign.dproj
trunk/jvcl/packages/d11/JvBDE.dproj
trunk/jvcl/packages/d11/JvBDEDesign.dproj
trunk/jvcl/packages/d11/JvBands.dproj
trunk/jvcl/packages/d11/JvBandsDesign.dproj
trunk/jvcl/packages/d11/JvCmp.dproj
trunk/jvcl/packages/d11/JvCmpDesign.dproj
trunk/jvcl/packages/d11/JvControls.dproj
trunk/jvcl/packages/d11/JvControlsDesign.dproj
trunk/jvcl/packages/d11/JvCore.dproj
trunk/jvcl/packages/d11/JvCoreDesign.dproj
trunk/jvcl/packages/d11/JvCrypt.dproj
trunk/jvcl/packages/d11/JvCryptDesign.dproj
trunk/jvcl/packages/d11/JvCustom.dproj
trunk/jvcl/packages/d11/JvCustomDesign.dproj
trunk/jvcl/packages/d11/JvDB.dproj
trunk/jvcl/packages/d11/JvDBDesign.dproj
trunk/jvcl/packages/d11/JvDlgs.dproj
trunk/jvcl/packages/d11/JvDlgsDesign.dproj
trunk/jvcl/packages/d11/JvDocking.dproj
trunk/jvcl/packages/d11/JvDockingDesign.dproj
trunk/jvcl/packages/d11/JvDotNetCtrls.dproj
trunk/jvcl/packages/d11/JvDotNetCtrlsDesign.dproj
trunk/jvcl/packages/d11/JvGlobus.dproj
trunk/jvcl/packages/d11/JvGlobusDesign.dproj
trunk/jvcl/packages/d11/JvHMI.dproj
trunk/jvcl/packages/d11/JvHMIDesign.dproj
trunk/jvcl/packages/d11/JvJans.dproj
trunk/jvcl/packages/d11/JvJansDesign.dproj
trunk/jvcl/packages/d11/JvMM.dproj
trunk/jvcl/packages/d11/JvMMDesign.dproj
trunk/jvcl/packages/d11/JvManagedThreads.dproj
trunk/jvcl/packages/d11/JvManagedThreadsDesign.dproj
trunk/jvcl/packages/d11/JvNet.dproj
trunk/jvcl/packages/d11/JvNetDesign.dproj
trunk/jvcl/packages/d11/JvPageComps.dproj
trunk/jvcl/packages/d11/JvPageCompsDesign.dproj
trunk/jvcl/packages/d11/JvPascalInterpreter.dproj
trunk/jvcl/packages/d11/JvPascalInterpreterDesign.dproj
trunk/jvcl/packages/d11/JvPluginSystem.dproj
trunk/jvcl/packages/d11/JvPluginSystemDesign.dproj
trunk/jvcl/packages/d11/JvPrintPreview.dproj
trunk/jvcl/packages/d11/JvPrintPreviewDesign.dproj
trunk/jvcl/packages/d11/JvRuntimeDesign.dproj
trunk/jvcl/packages/d11/JvRuntimeDesignDesign.dproj
trunk/jvcl/packages/d11/JvStdCtrls.dproj
trunk/jvcl/packages/d11/JvStdCtrlsDesign.dproj
trunk/jvcl/packages/d11/JvSystem.dproj
trunk/jvcl/packages/d11/JvSystemDesign.dproj
trunk/jvcl/packages/d11/JvTimeFramework.dproj
trunk/jvcl/packages/d11/JvTimeFrameworkDesign.dproj
trunk/jvcl/packages/d11/JvWizards.dproj
trunk/jvcl/packages/d11/JvWizardsDesign.dproj
trunk/jvcl/packages/d11/JvXPCtrls.dproj
trunk/jvcl/packages/d11/JvXPCtrlsDesign.dproj
trunk/jvcl/packages/d11/template.dproj
trunk/jvcl/packages/d9/JvAppFrm.bdsproj
trunk/jvcl/packages/d9/JvAppFrmDesign.bdsproj
trunk/jvcl/packages/d9/JvBDE.bdsproj
trunk/jvcl/packages/d9/JvBDEDesign.bdsproj
trunk/jvcl/packages/d9/JvBands.bdsproj
trunk/jvcl/packages/d9/JvBandsDesign.bdsproj
trunk/jvcl/packages/d9/JvCmp.bdsproj
trunk/jvcl/packages/d9/JvCmpDesign.bdsproj
trunk/jvcl/packages/d9/JvControls.bdsproj
trunk/jvcl/packages/d9/JvControlsDesign.bdsproj
trunk/jvcl/packages/d9/JvCore.bdsproj
trunk/jvcl/packages/d9/JvCoreDesign.bdsproj
trunk/jvcl/packages/d9/JvCrypt.bdsproj
trunk/jvcl/packages/d9/JvCryptDesign.bdsproj
trunk/jvcl/packages/d9/JvCustom.bdsproj
trunk/jvcl/packages/d9/JvCustomDesign.bdsproj
trunk/jvcl/packages/d9/JvDB.bdsproj
trunk/jvcl/packages/d9/JvDBDesign.bdsproj
trunk/jvcl/packages/d9/JvDlgs.bdsproj
trunk/jvcl/packages/d9/JvDlgsDesign.bdsproj
trunk/jvcl/packages/d9/JvDocking.bdsproj
trunk/jvcl/packages/d9/JvDockingDesign.bdsproj
trunk/jvcl/packages/d9/JvDotNetCtrls.bdsproj
trunk/jvcl/packages/d9/JvDotNetCtrlsDesign.bdsproj
trunk/jvcl/packages/d9/JvGlobus.bdsproj
trunk/jvcl/packages/d9/JvGlobusDesign.bdsproj
trunk/jvcl/packages/d9/JvHMI.bdsproj
trunk/jvcl/packages/d9/JvHMIDesign.bdsproj
trunk/jvcl/packages/d9/JvJans.bdsproj
trunk/jvcl/packages/d9/JvJansDesign.bdsproj
trunk/jvcl/packages/d9/JvMM.bdsproj
trunk/jvcl/packages/d9/JvMMDesign.bdsproj
trunk/jvcl/packages/d9/JvManagedThreads.bdsproj
trunk/jvcl/packages/d9/JvManagedThreadsDesign.bdsproj
trunk/jvcl/packages/d9/JvNet.bdsproj
trunk/jvcl/packages/d9/JvNetDesign.bdsproj
trunk/jvcl/packages/d9/JvPageComps.bdsproj
trunk/jvcl/packages/d9/JvPageCompsDesign.bdsproj
trunk/jvcl/packages/d9/JvPascalInterpreter.bdsproj
trunk/jvcl/packages/d9/JvPascalInterpreterDesign.bdsproj
trunk/jvcl/packages/d9/JvPluginSystem.bdsproj
trunk/jvcl/packages/d9/JvPluginSystemDesign.bdsproj
trunk/jvcl/packages/d9/JvPrintPreview.bdsproj
trunk/jvcl/packages/d9/JvPrintPreviewDesign.bdsproj
trunk/jvcl/packages/d9/JvRuntimeDesign.bdsproj
trunk/jvcl/packages/d9/JvRuntimeDesignDesign.bdsproj
trunk/jvcl/packages/d9/JvStdCtrls.bdsproj
trunk/jvcl/packages/d9/JvStdCtrlsDesign.bdsproj
trunk/jvcl/packages/d9/JvSystem.bdsproj
trunk/jvcl/packages/d9/JvSystemDesign.bdsproj
trunk/jvcl/packages/d9/JvTimeFramework.bdsproj
trunk/jvcl/packages/d9/JvTimeFrameworkDesign.bdsproj
trunk/jvcl/packages/d9/JvWizards.bdsproj
trunk/jvcl/packages/d9/JvWizardsDesign.bdsproj
trunk/jvcl/packages/d9/JvXPCtrls.bdsproj
trunk/jvcl/packages/d9/JvXPCtrlsDesign.bdsproj
trunk/jvcl/packages/d9/template.bdsproj
trunk/jvcl/packages/d9per/JvCore.bdsproj
trunk/jvcl/packages/d9per/JvDotNetCtrls.bdsproj
trunk/jvcl/packages/d9per/JvGlobus.bdsproj
trunk/jvcl/packages/d9per/JvGlobusDesign.bdsproj
trunk/jvcl/packages/d9per/JvPascalInterpreter.bdsproj
trunk/jvcl/packages/d9per/JvPascalInterpreterDesign.bdsproj
trunk/jvcl/packages/d9per/JvRuntimeDesign.bdsproj
Modified: trunk/jvcl/packages/d10/JvAppFrm.bdsproj
===================================================================
--- trunk/jvcl/packages/d10/JvAppFrm.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10/JvAppFrm.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10/JvAppFrmDesign.bdsproj
===================================================================
--- trunk/jvcl/packages/d10/JvAppFrmDesign.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10/JvAppFrmDesign.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10/JvBDE.bdsproj
===================================================================
--- trunk/jvcl/packages/d10/JvBDE.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10/JvBDE.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10/JvBDEDesign.bdsproj
===================================================================
--- trunk/jvcl/packages/d10/JvBDEDesign.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10/JvBDEDesign.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10/JvBands.bdsproj
===================================================================
--- trunk/jvcl/packages/d10/JvBands.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10/JvBands.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10/JvBandsDesign.bdsproj
===================================================================
--- trunk/jvcl/packages/d10/JvBandsDesign.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10/JvBandsDesign.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10/JvCmp.bdsproj
===================================================================
--- trunk/jvcl/packages/d10/JvCmp.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10/JvCmp.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10/JvCmpDesign.bdsproj
===================================================================
--- trunk/jvcl/packages/d10/JvCmpDesign.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10/JvCmpDesign.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10/JvControls.bdsproj
===================================================================
--- trunk/jvcl/packages/d10/JvControls.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10/JvControls.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10/JvControlsDesign.bdsproj
===================================================================
--- trunk/jvcl/packages/d10/JvControlsDesign.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10/JvControlsDesign.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10/JvCore.bdsproj
===================================================================
--- trunk/jvcl/packages/d10/JvCore.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10/JvCore.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10/JvCoreDesign.bdsproj
===================================================================
--- trunk/jvcl/packages/d10/JvCoreDesign.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10/JvCoreDesign.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10/JvCrypt.bdsproj
===================================================================
--- trunk/jvcl/packages/d10/JvCrypt.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10/JvCrypt.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10/JvCryptDesign.bdsproj
===================================================================
--- trunk/jvcl/packages/d10/JvCryptDesign.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10/JvCryptDesign.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10/JvCustom.bdsproj
===================================================================
--- trunk/jvcl/packages/d10/JvCustom.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10/JvCustom.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10/JvCustomDesign.bdsproj
===================================================================
--- trunk/jvcl/packages/d10/JvCustomDesign.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10/JvCustomDesign.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10/JvDB.bdsproj
===================================================================
--- trunk/jvcl/packages/d10/JvDB.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10/JvDB.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10/JvDBDesign.bdsproj
===================================================================
--- trunk/jvcl/packages/d10/JvDBDesign.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10/JvDBDesign.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10/JvDlgs.bdsproj
===================================================================
--- trunk/jvcl/packages/d10/JvDlgs.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10/JvDlgs.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10/JvDlgsDesign.bdsproj
===================================================================
--- trunk/jvcl/packages/d10/JvDlgsDesign.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10/JvDlgsDesign.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10/JvDocking.bdsproj
===================================================================
--- trunk/jvcl/packages/d10/JvDocking.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10/JvDocking.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10/JvDockingDesign.bdsproj
===================================================================
--- trunk/jvcl/packages/d10/JvDockingDesign.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10/JvDockingDesign.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10/JvDotNetCtrls.bdsproj
===================================================================
--- trunk/jvcl/packages/d10/JvDotNetCtrls.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10/JvDotNetCtrls.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10/JvDotNetCtrlsDesign.bdsproj
===================================================================
--- trunk/jvcl/packages/d10/JvDotNetCtrlsDesign.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10/JvDotNetCtrlsDesign.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10/JvGlobus.bdsproj
===================================================================
--- trunk/jvcl/packages/d10/JvGlobus.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10/JvGlobus.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10/JvGlobusDesign.bdsproj
===================================================================
--- trunk/jvcl/packages/d10/JvGlobusDesign.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10/JvGlobusDesign.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10/JvHMI.bdsproj
===================================================================
--- trunk/jvcl/packages/d10/JvHMI.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10/JvHMI.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10/JvHMIDesign.bdsproj
===================================================================
--- trunk/jvcl/packages/d10/JvHMIDesign.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10/JvHMIDesign.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10/JvJans.bdsproj
===================================================================
--- trunk/jvcl/packages/d10/JvJans.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10/JvJans.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10/JvJansDesign.bdsproj
===================================================================
--- trunk/jvcl/packages/d10/JvJansDesign.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10/JvJansDesign.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10/JvMM.bdsproj
===================================================================
--- trunk/jvcl/packages/d10/JvMM.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10/JvMM.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10/JvMMDesign.bdsproj
===================================================================
--- trunk/jvcl/packages/d10/JvMMDesign.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10/JvMMDesign.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10/JvManagedThreads.bdsproj
===================================================================
--- trunk/jvcl/packages/d10/JvManagedThreads.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10/JvManagedThreads.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10/JvManagedThreadsDesign.bdsproj
===================================================================
--- trunk/jvcl/packages/d10/JvManagedThreadsDesign.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10/JvManagedThreadsDesign.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10/JvNet.bdsproj
===================================================================
--- trunk/jvcl/packages/d10/JvNet.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10/JvNet.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10/JvNetDesign.bdsproj
===================================================================
--- trunk/jvcl/packages/d10/JvNetDesign.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10/JvNetDesign.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10/JvPageComps.bdsproj
===================================================================
--- trunk/jvcl/packages/d10/JvPageComps.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10/JvPageComps.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10/JvPageCompsDesign.bdsproj
===================================================================
--- trunk/jvcl/packages/d10/JvPageCompsDesign.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10/JvPageCompsDesign.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10/JvPascalInterpreter.bdsproj
===================================================================
--- trunk/jvcl/packages/d10/JvPascalInterpreter.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10/JvPascalInterpreter.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10/JvPascalInterpreterDesign.bdsproj
===================================================================
--- trunk/jvcl/packages/d10/JvPascalInterpreterDesign.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10/JvPascalInterpreterDesign.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10/JvPluginSystem.bdsproj
===================================================================
--- trunk/jvcl/packages/d10/JvPluginSystem.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10/JvPluginSystem.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10/JvPluginSystemDesign.bdsproj
===================================================================
--- trunk/jvcl/packages/d10/JvPluginSystemDesign.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10/JvPluginSystemDesign.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10/JvPrintPreview.bdsproj
===================================================================
--- trunk/jvcl/packages/d10/JvPrintPreview.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10/JvPrintPreview.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10/JvPrintPreviewDesign.bdsproj
===================================================================
--- trunk/jvcl/packages/d10/JvPrintPreviewDesign.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10/JvPrintPreviewDesign.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10/JvRuntimeDesign.bdsproj
===================================================================
--- trunk/jvcl/packages/d10/JvRuntimeDesign.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10/JvRuntimeDesign.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10/JvRuntimeDesignDesign.bdsproj
===================================================================
--- trunk/jvcl/packages/d10/JvRuntimeDesignDesign.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10/JvRuntimeDesignDesign.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10/JvStdCtrls.bdsproj
===================================================================
--- trunk/jvcl/packages/d10/JvStdCtrls.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10/JvStdCtrls.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10/JvStdCtrlsDesign.bdsproj
===================================================================
--- trunk/jvcl/packages/d10/JvStdCtrlsDesign.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10/JvStdCtrlsDesign.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10/JvSystem.bdsproj
===================================================================
--- trunk/jvcl/packages/d10/JvSystem.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10/JvSystem.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10/JvSystemDesign.bdsproj
===================================================================
--- trunk/jvcl/packages/d10/JvSystemDesign.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10/JvSystemDesign.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10/JvTimeFramework.bdsproj
===================================================================
--- trunk/jvcl/packages/d10/JvTimeFramework.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10/JvTimeFramework.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10/JvTimeFrameworkDesign.bdsproj
===================================================================
--- trunk/jvcl/packages/d10/JvTimeFrameworkDesign.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10/JvTimeFrameworkDesign.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10/JvWizards.bdsproj
===================================================================
--- trunk/jvcl/packages/d10/JvWizards.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10/JvWizards.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10/JvWizardsDesign.bdsproj
===================================================================
--- trunk/jvcl/packages/d10/JvWizardsDesign.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10/JvWizardsDesign.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10/JvXPCtrls.bdsproj
===================================================================
--- trunk/jvcl/packages/d10/JvXPCtrls.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10/JvXPCtrls.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10/JvXPCtrlsDesign.bdsproj
===================================================================
--- trunk/jvcl/packages/d10/JvXPCtrlsDesign.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10/JvXPCtrlsDesign.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10/template.bdsproj
===================================================================
--- trunk/jvcl/packages/d10/template.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10/template.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10per/JvCore.bdsproj
===================================================================
--- trunk/jvcl/packages/d10per/JvCore.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10per/JvCore.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10per/JvDotNetCtrls.bdsproj
===================================================================
--- trunk/jvcl/packages/d10per/JvDotNetCtrls.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10per/JvDotNetCtrls.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10per/JvGlobus.bdsproj
===================================================================
--- trunk/jvcl/packages/d10per/JvGlobus.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10per/JvGlobus.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10per/JvGlobusDesign.bdsproj
===================================================================
--- trunk/jvcl/packages/d10per/JvGlobusDesign.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10per/JvGlobusDesign.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10per/JvPascalInterpreter.bdsproj
===================================================================
--- trunk/jvcl/packages/d10per/JvPascalInterpreter.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10per/JvPascalInterpreter.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10per/JvPascalInterpreterDesign.bdsproj
===================================================================
--- trunk/jvcl/packages/d10per/JvPascalInterpreterDesign.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10per/JvPascalInterpreterDesign.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d10per/JvRuntimeDesign.bdsproj
===================================================================
--- trunk/jvcl/packages/d10per/JvRuntimeDesign.bdsproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d10per/JvRuntimeDesign.bdsproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -157,7 +157,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1053</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
</Delphi.Personality>
Modified: trunk/jvcl/packages/d11/JvAppFrm.dproj
===================================================================
--- trunk/jvcl/packages/d11/JvAppFrm.dproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d11/JvAppFrm.dproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -55,7 +55,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1031</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
<VersionInfoKeys>
Modified: trunk/jvcl/packages/d11/JvAppFrmDesign.dproj
===================================================================
--- trunk/jvcl/packages/d11/JvAppFrmDesign.dproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d11/JvAppFrmDesign.dproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -55,7 +55,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1031</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
<VersionInfoKeys>
Modified: trunk/jvcl/packages/d11/JvBDE.dproj
===================================================================
--- trunk/jvcl/packages/d11/JvBDE.dproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d11/JvBDE.dproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -55,7 +55,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1031</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
<VersionInfoKeys>
Modified: trunk/jvcl/packages/d11/JvBDEDesign.dproj
===================================================================
--- trunk/jvcl/packages/d11/JvBDEDesign.dproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d11/JvBDEDesign.dproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -55,7 +55,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1031</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
<VersionInfoKeys>
Modified: trunk/jvcl/packages/d11/JvBands.dproj
===================================================================
--- trunk/jvcl/packages/d11/JvBands.dproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d11/JvBands.dproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -55,7 +55,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1031</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
<VersionInfoKeys>
Modified: trunk/jvcl/packages/d11/JvBandsDesign.dproj
===================================================================
--- trunk/jvcl/packages/d11/JvBandsDesign.dproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d11/JvBandsDesign.dproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -55,7 +55,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1031</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
<VersionInfoKeys>
Modified: trunk/jvcl/packages/d11/JvCmp.dproj
===================================================================
--- trunk/jvcl/packages/d11/JvCmp.dproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d11/JvCmp.dproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -55,7 +55,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1031</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
<VersionInfoKeys>
Modified: trunk/jvcl/packages/d11/JvCmpDesign.dproj
===================================================================
--- trunk/jvcl/packages/d11/JvCmpDesign.dproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d11/JvCmpDesign.dproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -55,7 +55,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1031</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
<VersionInfoKeys>
Modified: trunk/jvcl/packages/d11/JvControls.dproj
===================================================================
--- trunk/jvcl/packages/d11/JvControls.dproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d11/JvControls.dproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -55,7 +55,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1031</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
<VersionInfoKeys>
Modified: trunk/jvcl/packages/d11/JvControlsDesign.dproj
===================================================================
--- trunk/jvcl/packages/d11/JvControlsDesign.dproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d11/JvControlsDesign.dproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -55,7 +55,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1031</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
<VersionInfoKeys>
Modified: trunk/jvcl/packages/d11/JvCore.dproj
===================================================================
--- trunk/jvcl/packages/d11/JvCore.dproj 2012-08-11 21:55:23 UTC (rev 13390)
+++ trunk/jvcl/packages/d11/JvCore.dproj 2012-08-11 23:01:38 UTC (rev 13391)
@@ -55,7 +55,7 @@
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
- <VersionInfo Name="Locale">1031</VersionInfo>
+ <VersionInfo Name="Locale">1033</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
<VersionInfoKeys>
Modified: trunk/jvcl/pa...
[truncated message content] |
|
From: <ou...@us...> - 2012-08-11 21:55:46
|
Revision: 13390
http://jvcl.svn.sourceforge.net/jvcl/?rev=13390&view=rev
Author: outchy
Date: 2012-08-11 21:55:23 +0000 (Sat, 11 Aug 2012)
Log Message:
-----------
update years in copyright notices.
Modified Paths:
--------------
trunk/jvcl/devtools/bin/pgEdit.xml
trunk/jvcl/packages/c6/JvAppFrm.rc
trunk/jvcl/packages/c6/JvAppFrm.res
trunk/jvcl/packages/c6/JvAppFrmDesign.rc
trunk/jvcl/packages/c6/JvAppFrmDesign.res
trunk/jvcl/packages/c6/JvBDE.rc
trunk/jvcl/packages/c6/JvBDE.res
trunk/jvcl/packages/c6/JvBDEDesign.rc
trunk/jvcl/packages/c6/JvBDEDesign.res
trunk/jvcl/packages/c6/JvBands.rc
trunk/jvcl/packages/c6/JvBands.res
trunk/jvcl/packages/c6/JvBandsDesign.rc
trunk/jvcl/packages/c6/JvBandsDesign.res
trunk/jvcl/packages/c6/JvCmp.rc
trunk/jvcl/packages/c6/JvCmp.res
trunk/jvcl/packages/c6/JvCmpDesign.rc
trunk/jvcl/packages/c6/JvCmpDesign.res
trunk/jvcl/packages/c6/JvControls.rc
trunk/jvcl/packages/c6/JvControls.res
trunk/jvcl/packages/c6/JvControlsDesign.rc
trunk/jvcl/packages/c6/JvControlsDesign.res
trunk/jvcl/packages/c6/JvCore.rc
trunk/jvcl/packages/c6/JvCore.res
trunk/jvcl/packages/c6/JvCoreDesign.rc
trunk/jvcl/packages/c6/JvCoreDesign.res
trunk/jvcl/packages/c6/JvCrypt.rc
trunk/jvcl/packages/c6/JvCrypt.res
trunk/jvcl/packages/c6/JvCryptDesign.rc
trunk/jvcl/packages/c6/JvCryptDesign.res
trunk/jvcl/packages/c6/JvCustom.rc
trunk/jvcl/packages/c6/JvCustom.res
trunk/jvcl/packages/c6/JvCustomDesign.rc
trunk/jvcl/packages/c6/JvCustomDesign.res
trunk/jvcl/packages/c6/JvDB.rc
trunk/jvcl/packages/c6/JvDB.res
trunk/jvcl/packages/c6/JvDBDesign.rc
trunk/jvcl/packages/c6/JvDBDesign.res
trunk/jvcl/packages/c6/JvDlgs.rc
trunk/jvcl/packages/c6/JvDlgs.res
trunk/jvcl/packages/c6/JvDlgsDesign.rc
trunk/jvcl/packages/c6/JvDlgsDesign.res
trunk/jvcl/packages/c6/JvDocking.rc
trunk/jvcl/packages/c6/JvDocking.res
trunk/jvcl/packages/c6/JvDockingDesign.rc
trunk/jvcl/packages/c6/JvDockingDesign.res
trunk/jvcl/packages/c6/JvDotNetCtrls.rc
trunk/jvcl/packages/c6/JvDotNetCtrls.res
trunk/jvcl/packages/c6/JvDotNetCtrlsDesign.rc
trunk/jvcl/packages/c6/JvDotNetCtrlsDesign.res
trunk/jvcl/packages/c6/JvGlobus.rc
trunk/jvcl/packages/c6/JvGlobus.res
trunk/jvcl/packages/c6/JvGlobusDesign.rc
trunk/jvcl/packages/c6/JvGlobusDesign.res
trunk/jvcl/packages/c6/JvHMI.rc
trunk/jvcl/packages/c6/JvHMI.res
trunk/jvcl/packages/c6/JvHMIDesign.rc
trunk/jvcl/packages/c6/JvHMIDesign.res
trunk/jvcl/packages/c6/JvJans.rc
trunk/jvcl/packages/c6/JvJans.res
trunk/jvcl/packages/c6/JvJansDesign.rc
trunk/jvcl/packages/c6/JvJansDesign.res
trunk/jvcl/packages/c6/JvMM.rc
trunk/jvcl/packages/c6/JvMM.res
trunk/jvcl/packages/c6/JvMMDesign.rc
trunk/jvcl/packages/c6/JvMMDesign.res
trunk/jvcl/packages/c6/JvManagedThreads.rc
trunk/jvcl/packages/c6/JvManagedThreads.res
trunk/jvcl/packages/c6/JvManagedThreadsDesign.rc
trunk/jvcl/packages/c6/JvManagedThreadsDesign.res
trunk/jvcl/packages/c6/JvNet.rc
trunk/jvcl/packages/c6/JvNet.res
trunk/jvcl/packages/c6/JvNetDesign.rc
trunk/jvcl/packages/c6/JvNetDesign.res
trunk/jvcl/packages/c6/JvPageComps.rc
trunk/jvcl/packages/c6/JvPageComps.res
trunk/jvcl/packages/c6/JvPageCompsDesign.rc
trunk/jvcl/packages/c6/JvPageCompsDesign.res
trunk/jvcl/packages/c6/JvPascalInterpreter.rc
trunk/jvcl/packages/c6/JvPascalInterpreter.res
trunk/jvcl/packages/c6/JvPascalInterpreterDesign.rc
trunk/jvcl/packages/c6/JvPascalInterpreterDesign.res
trunk/jvcl/packages/c6/JvPluginSystem.rc
trunk/jvcl/packages/c6/JvPluginSystem.res
trunk/jvcl/packages/c6/JvPluginSystemDesign.rc
trunk/jvcl/packages/c6/JvPluginSystemDesign.res
trunk/jvcl/packages/c6/JvPrintPreview.rc
trunk/jvcl/packages/c6/JvPrintPreview.res
trunk/jvcl/packages/c6/JvPrintPreviewDesign.rc
trunk/jvcl/packages/c6/JvPrintPreviewDesign.res
trunk/jvcl/packages/c6/JvRuntimeDesign.rc
trunk/jvcl/packages/c6/JvRuntimeDesign.res
trunk/jvcl/packages/c6/JvRuntimeDesignDesign.rc
trunk/jvcl/packages/c6/JvRuntimeDesignDesign.res
trunk/jvcl/packages/c6/JvStdCtrls.rc
trunk/jvcl/packages/c6/JvStdCtrls.res
trunk/jvcl/packages/c6/JvStdCtrlsDesign.rc
trunk/jvcl/packages/c6/JvStdCtrlsDesign.res
trunk/jvcl/packages/c6/JvSystem.rc
trunk/jvcl/packages/c6/JvSystem.res
trunk/jvcl/packages/c6/JvSystemDesign.rc
trunk/jvcl/packages/c6/JvSystemDesign.res
trunk/jvcl/packages/c6/JvTimeFramework.rc
trunk/jvcl/packages/c6/JvTimeFramework.res
trunk/jvcl/packages/c6/JvTimeFrameworkDesign.rc
trunk/jvcl/packages/c6/JvTimeFrameworkDesign.res
trunk/jvcl/packages/c6/JvWizards.rc
trunk/jvcl/packages/c6/JvWizards.res
trunk/jvcl/packages/c6/JvWizardsDesign.rc
trunk/jvcl/packages/c6/JvWizardsDesign.res
trunk/jvcl/packages/c6/JvXPCtrls.rc
trunk/jvcl/packages/c6/JvXPCtrls.res
trunk/jvcl/packages/c6/JvXPCtrlsDesign.rc
trunk/jvcl/packages/c6/JvXPCtrlsDesign.res
trunk/jvcl/packages/c6per/JvCore.rc
trunk/jvcl/packages/c6per/JvCore.res
trunk/jvcl/packages/c6per/JvDotNetCtrls.rc
trunk/jvcl/packages/c6per/JvDotNetCtrls.res
trunk/jvcl/packages/c6per/JvGlobus.rc
trunk/jvcl/packages/c6per/JvGlobus.res
trunk/jvcl/packages/c6per/JvGlobusDesign.rc
trunk/jvcl/packages/c6per/JvGlobusDesign.res
trunk/jvcl/packages/c6per/JvPascalInterpreter.rc
trunk/jvcl/packages/c6per/JvPascalInterpreter.res
trunk/jvcl/packages/c6per/JvPascalInterpreterDesign.rc
trunk/jvcl/packages/c6per/JvPascalInterpreterDesign.res
trunk/jvcl/packages/c6per/JvRuntimeDesign.rc
trunk/jvcl/packages/c6per/JvRuntimeDesign.res
trunk/jvcl/packages/d10/JvAppFrm.rc
trunk/jvcl/packages/d10/JvAppFrm.res
trunk/jvcl/packages/d10/JvAppFrmDesign.rc
trunk/jvcl/packages/d10/JvAppFrmDesign.res
trunk/jvcl/packages/d10/JvBDE.rc
trunk/jvcl/packages/d10/JvBDE.res
trunk/jvcl/packages/d10/JvBDEDesign.rc
trunk/jvcl/packages/d10/JvBDEDesign.res
trunk/jvcl/packages/d10/JvBands.rc
trunk/jvcl/packages/d10/JvBands.res
trunk/jvcl/packages/d10/JvBandsDesign.rc
trunk/jvcl/packages/d10/JvBandsDesign.res
trunk/jvcl/packages/d10/JvCmp.rc
trunk/jvcl/packages/d10/JvCmp.res
trunk/jvcl/packages/d10/JvCmpDesign.rc
trunk/jvcl/packages/d10/JvCmpDesign.res
trunk/jvcl/packages/d10/JvControls.rc
trunk/jvcl/packages/d10/JvControls.res
trunk/jvcl/packages/d10/JvControlsDesign.rc
trunk/jvcl/packages/d10/JvControlsDesign.res
trunk/jvcl/packages/d10/JvCore.rc
trunk/jvcl/packages/d10/JvCore.res
trunk/jvcl/packages/d10/JvCoreDesign.rc
trunk/jvcl/packages/d10/JvCoreDesign.res
trunk/jvcl/packages/d10/JvCrypt.rc
trunk/jvcl/packages/d10/JvCrypt.res
trunk/jvcl/packages/d10/JvCryptDesign.rc
trunk/jvcl/packages/d10/JvCryptDesign.res
trunk/jvcl/packages/d10/JvCustom.rc
trunk/jvcl/packages/d10/JvCustom.res
trunk/jvcl/packages/d10/JvCustomDesign.rc
trunk/jvcl/packages/d10/JvCustomDesign.res
trunk/jvcl/packages/d10/JvDB.rc
trunk/jvcl/packages/d10/JvDB.res
trunk/jvcl/packages/d10/JvDBDesign.rc
trunk/jvcl/packages/d10/JvDBDesign.res
trunk/jvcl/packages/d10/JvDlgs.rc
trunk/jvcl/packages/d10/JvDlgs.res
trunk/jvcl/packages/d10/JvDlgsDesign.rc
trunk/jvcl/packages/d10/JvDlgsDesign.res
trunk/jvcl/packages/d10/JvDocking.rc
trunk/jvcl/packages/d10/JvDocking.res
trunk/jvcl/packages/d10/JvDockingDesign.rc
trunk/jvcl/packages/d10/JvDockingDesign.res
trunk/jvcl/packages/d10/JvDotNetCtrls.rc
trunk/jvcl/packages/d10/JvDotNetCtrls.res
trunk/jvcl/packages/d10/JvDotNetCtrlsDesign.rc
trunk/jvcl/packages/d10/JvDotNetCtrlsDesign.res
trunk/jvcl/packages/d10/JvGlobus.rc
trunk/jvcl/packages/d10/JvGlobus.res
trunk/jvcl/packages/d10/JvGlobusDesign.rc
trunk/jvcl/packages/d10/JvGlobusDesign.res
trunk/jvcl/packages/d10/JvHMI.rc
trunk/jvcl/packages/d10/JvHMI.res
trunk/jvcl/packages/d10/JvHMIDesign.rc
trunk/jvcl/packages/d10/JvHMIDesign.res
trunk/jvcl/packages/d10/JvJans.rc
trunk/jvcl/packages/d10/JvJans.res
trunk/jvcl/packages/d10/JvJansDesign.rc
trunk/jvcl/packages/d10/JvJansDesign.res
trunk/jvcl/packages/d10/JvMM.rc
trunk/jvcl/packages/d10/JvMM.res
trunk/jvcl/packages/d10/JvMMDesign.rc
trunk/jvcl/packages/d10/JvMMDesign.res
trunk/jvcl/packages/d10/JvManagedThreads.rc
trunk/jvcl/packages/d10/JvManagedThreads.res
trunk/jvcl/packages/d10/JvManagedThreadsDesign.rc
trunk/jvcl/packages/d10/JvManagedThreadsDesign.res
trunk/jvcl/packages/d10/JvNet.rc
trunk/jvcl/packages/d10/JvNet.res
trunk/jvcl/packages/d10/JvNetDesign.rc
trunk/jvcl/packages/d10/JvNetDesign.res
trunk/jvcl/packages/d10/JvPageComps.rc
trunk/jvcl/packages/d10/JvPageComps.res
trunk/jvcl/packages/d10/JvPageCompsDesign.rc
trunk/jvcl/packages/d10/JvPageCompsDesign.res
trunk/jvcl/packages/d10/JvPascalInterpreter.rc
trunk/jvcl/packages/d10/JvPascalInterpreter.res
trunk/jvcl/packages/d10/JvPascalInterpreterDesign.rc
trunk/jvcl/packages/d10/JvPascalInterpreterDesign.res
trunk/jvcl/packages/d10/JvPluginSystem.rc
trunk/jvcl/packages/d10/JvPluginSystem.res
trunk/jvcl/packages/d10/JvPluginSystemDesign.rc
trunk/jvcl/packages/d10/JvPluginSystemDesign.res
trunk/jvcl/packages/d10/JvPrintPreview.rc
trunk/jvcl/packages/d10/JvPrintPreview.res
trunk/jvcl/packages/d10/JvPrintPreviewDesign.rc
trunk/jvcl/packages/d10/JvPrintPreviewDesign.res
trunk/jvcl/packages/d10/JvRuntimeDesign.rc
trunk/jvcl/packages/d10/JvRuntimeDesign.res
trunk/jvcl/packages/d10/JvRuntimeDesignDesign.rc
trunk/jvcl/packages/d10/JvRuntimeDesignDesign.res
trunk/jvcl/packages/d10/JvStdCtrls.rc
trunk/jvcl/packages/d10/JvStdCtrls.res
trunk/jvcl/packages/d10/JvStdCtrlsDesign.rc
trunk/jvcl/packages/d10/JvStdCtrlsDesign.res
trunk/jvcl/packages/d10/JvSystem.rc
trunk/jvcl/packages/d10/JvSystem.res
trunk/jvcl/packages/d10/JvSystemDesign.rc
trunk/jvcl/packages/d10/JvSystemDesign.res
trunk/jvcl/packages/d10/JvTimeFramework.rc
trunk/jvcl/packages/d10/JvTimeFramework.res
trunk/jvcl/packages/d10/JvTimeFrameworkDesign.rc
trunk/jvcl/packages/d10/JvTimeFrameworkDesign.res
trunk/jvcl/packages/d10/JvWizards.rc
trunk/jvcl/packages/d10/JvWizards.res
trunk/jvcl/packages/d10/JvWizardsDesign.rc
trunk/jvcl/packages/d10/JvWizardsDesign.res
trunk/jvcl/packages/d10/JvXPCtrls.rc
trunk/jvcl/packages/d10/JvXPCtrls.res
trunk/jvcl/packages/d10/JvXPCtrlsDesign.rc
trunk/jvcl/packages/d10/JvXPCtrlsDesign.res
trunk/jvcl/packages/d10per/JvCore.rc
trunk/jvcl/packages/d10per/JvCore.res
trunk/jvcl/packages/d10per/JvDotNetCtrls.rc
trunk/jvcl/packages/d10per/JvDotNetCtrls.res
trunk/jvcl/packages/d10per/JvGlobus.rc
trunk/jvcl/packages/d10per/JvGlobus.res
trunk/jvcl/packages/d10per/JvGlobusDesign.rc
trunk/jvcl/packages/d10per/JvGlobusDesign.res
trunk/jvcl/packages/d10per/JvPascalInterpreter.rc
trunk/jvcl/packages/d10per/JvPascalInterpreter.res
trunk/jvcl/packages/d10per/JvPascalInterpreterDesign.rc
trunk/jvcl/packages/d10per/JvPascalInterpreterDesign.res
trunk/jvcl/packages/d10per/JvRuntimeDesign.rc
trunk/jvcl/packages/d10per/JvRuntimeDesign.res
trunk/jvcl/packages/d11/JvAppFrm.dproj
trunk/jvcl/packages/d11/JvAppFrm.rc
trunk/jvcl/packages/d11/JvAppFrm.res
trunk/jvcl/packages/d11/JvAppFrmDesign.dproj
trunk/jvcl/packages/d11/JvAppFrmDesign.rc
trunk/jvcl/packages/d11/JvAppFrmDesign.res
trunk/jvcl/packages/d11/JvBDE.dproj
trunk/jvcl/packages/d11/JvBDE.rc
trunk/jvcl/packages/d11/JvBDE.res
trunk/jvcl/packages/d11/JvBDEDesign.dproj
trunk/jvcl/packages/d11/JvBDEDesign.rc
trunk/jvcl/packages/d11/JvBDEDesign.res
trunk/jvcl/packages/d11/JvBands.dproj
trunk/jvcl/packages/d11/JvBands.rc
trunk/jvcl/packages/d11/JvBands.res
trunk/jvcl/packages/d11/JvBandsDesign.dproj
trunk/jvcl/packages/d11/JvBandsDesign.rc
trunk/jvcl/packages/d11/JvBandsDesign.res
trunk/jvcl/packages/d11/JvCmp.dproj
trunk/jvcl/packages/d11/JvCmp.rc
trunk/jvcl/packages/d11/JvCmp.res
trunk/jvcl/packages/d11/JvCmpDesign.dproj
trunk/jvcl/packages/d11/JvCmpDesign.rc
trunk/jvcl/packages/d11/JvCmpDesign.res
trunk/jvcl/packages/d11/JvControls.dproj
trunk/jvcl/packages/d11/JvControls.rc
trunk/jvcl/packages/d11/JvControls.res
trunk/jvcl/packages/d11/JvControlsDesign.dproj
trunk/jvcl/packages/d11/JvControlsDesign.rc
trunk/jvcl/packages/d11/JvControlsDesign.res
trunk/jvcl/packages/d11/JvCore.dproj
trunk/jvcl/packages/d11/JvCore.rc
trunk/jvcl/packages/d11/JvCore.res
trunk/jvcl/packages/d11/JvCoreDesign.dproj
trunk/jvcl/packages/d11/JvCoreDesign.rc
trunk/jvcl/packages/d11/JvCoreDesign.res
trunk/jvcl/packages/d11/JvCrypt.dproj
trunk/jvcl/packages/d11/JvCrypt.rc
trunk/jvcl/packages/d11/JvCrypt.res
trunk/jvcl/packages/d11/JvCryptDesign.dproj
trunk/jvcl/packages/d11/JvCryptDesign.rc
trunk/jvcl/packages/d11/JvCryptDesign.res
trunk/jvcl/packages/d11/JvCustom.dproj
trunk/jvcl/packages/d11/JvCustom.rc
trunk/jvcl/packages/d11/JvCustom.res
trunk/jvcl/packages/d11/JvCustomDesign.dproj
trunk/jvcl/packages/d11/JvCustomDesign.rc
trunk/jvcl/packages/d11/JvCustomDesign.res
trunk/jvcl/packages/d11/JvDB.dproj
trunk/jvcl/packages/d11/JvDB.rc
trunk/jvcl/packages/d11/JvDB.res
trunk/jvcl/packages/d11/JvDBDesign.dproj
trunk/jvcl/packages/d11/JvDBDesign.rc
trunk/jvcl/packages/d11/JvDBDesign.res
trunk/jvcl/packages/d11/JvDlgs.dproj
trunk/jvcl/packages/d11/JvDlgs.rc
trunk/jvcl/packages/d11/JvDlgs.res
trunk/jvcl/packages/d11/JvDlgsDesign.dproj
trunk/jvcl/packages/d11/JvDlgsDesign.rc
trunk/jvcl/packages/d11/JvDlgsDesign.res
trunk/jvcl/packages/d11/JvDocking.dproj
trunk/jvcl/packages/d11/JvDocking.rc
trunk/jvcl/packages/d11/JvDocking.res
trunk/jvcl/packages/d11/JvDockingDesign.dproj
trunk/jvcl/packages/d11/JvDockingDesign.rc
trunk/jvcl/packages/d11/JvDockingDesign.res
trunk/jvcl/packages/d11/JvDotNetCtrls.dproj
trunk/jvcl/packages/d11/JvDotNetCtrls.rc
trunk/jvcl/packages/d11/JvDotNetCtrls.res
trunk/jvcl/packages/d11/JvDotNetCtrlsDesign.dproj
trunk/jvcl/packages/d11/JvDotNetCtrlsDesign.rc
trunk/jvcl/packages/d11/JvDotNetCtrlsDesign.res
trunk/jvcl/packages/d11/JvGlobus.dproj
trunk/jvcl/packages/d11/JvGlobus.rc
trunk/jvcl/packages/d11/JvGlobus.res
trunk/jvcl/packages/d11/JvGlobusDesign.dproj
trunk/jvcl/packages/d11/JvGlobusDesign.rc
trunk/jvcl/packages/d11/JvGlobusDesign.res
trunk/jvcl/packages/d11/JvHMI.dproj
trunk/jvcl/packages/d11/JvHMI.rc
trunk/jvcl/packages/d11/JvHMI.res
trunk/jvcl/packages/d11/JvHMIDesign.dproj
trunk/jvcl/packages/d11/JvHMIDesign.rc
trunk/jvcl/packages/d11/JvHMIDesign.res
trunk/jvcl/packages/d11/JvJans.dproj
trunk/jvcl/packages/d11/JvJans.rc
trunk/jvcl/packages/d11/JvJans.res
trunk/jvcl/packages/d11/JvJansDesign.dproj
trunk/jvcl/packages/d11/JvJansDesign.rc
trunk/jvcl/packages/d11/JvJansDesign.res
trunk/jvcl/packages/d11/JvMM.dproj
trunk/jvcl/packages/d11/JvMM.rc
trunk/jvcl/packages/d11/JvMM.res
trunk/jvcl/packages/d11/JvMMDesign.dproj
trunk/jvcl/packages/d11/JvMMDesign.rc
trunk/jvcl/packages/d11/JvMMDesign.res
trunk/jvcl/packages/d11/JvManagedThreads.dproj
trunk/jvcl/packages/d11/JvManagedThreads.rc
trunk/jvcl/packages/d11/JvManagedThreads.res
trunk/jvcl/packages/d11/JvManagedThreadsDesign.dproj
trunk/jvcl/packages/d11/JvManagedThreadsDesign.rc
trunk/jvcl/packages/d11/JvManagedThreadsDesign.res
trunk/jvcl/packages/d11/JvNet.dproj
trunk/jvcl/packages/d11/JvNet.rc
trunk/jvcl/packages/d11/JvNet.res
trunk/jvcl/packages/d11/JvNetDesign.dproj
trunk/jvcl/packages/d11/JvNetDesign.rc
trunk/jvcl/packages/d11/JvNetDesign.res
trunk/jvcl/packages/d11/JvPageComps.dproj
trunk/jvcl/packages/d11/JvPageComps.rc
trunk/jvcl/packages/d11/JvPageComps.res
trunk/jvcl/packages/d11/JvPageCompsDesign.dproj
trunk/jvcl/packages/d11/JvPageCompsDesign.rc
trunk/jvcl/packages/d11/JvPageCompsDesign.res
trunk/jvcl/packages/d11/JvPascalInterpreter.dproj
trunk/jvcl/packages/d11/JvPascalInterpreter.rc
trunk/jvcl/packages/d11/JvPascalInterpreter.res
trunk/jvcl/packages/d11/JvPascalInterpreterDesign.dproj
trunk/jvcl/packages/d11/JvPascalInterpreterDesign.rc
trunk/jvcl/packages/d11/JvPascalInterpreterDesign.res
trunk/jvcl/packages/d11/JvPluginSystem.dproj
trunk/jvcl/packages/d11/JvPluginSystem.rc
trunk/jvcl/packages/d11/JvPluginSystem.res
trunk/jvcl/packages/d11/JvPluginSystemDesign.dproj
trunk/jvcl/packages/d11/JvPluginSystemDesign.rc
trunk/jvcl/packages/d11/JvPluginSystemDesign.res
trunk/jvcl/packages/d11/JvPrintPreview.dproj
trunk/jvcl/packages/d11/JvPrintPreview.rc
trunk/jvcl/packages/d11/JvPrintPreview.res
trunk/jvcl/packages/d11/JvPrintPreviewDesign.dproj
trunk/jvcl/packages/d11/JvPrintPreviewDesign.rc
trunk/jvcl/packages/d11/JvPrintPreviewDesign.res
trunk/jvcl/packages/d11/JvRuntimeDesign.dproj
trunk/jvcl/packages/d11/JvRuntimeDesign.rc
trunk/jvcl/packages/d11/JvRuntimeDesign.res
trunk/jvcl/packages/d11/JvRuntimeDesignDesign.dproj
trunk/jvcl/packages/d11/JvRuntimeDesignDesign.rc
trunk/jvcl/packages/d11/JvRuntimeDesignDesign.res
trunk/jvcl/packages/d11/JvStdCtrls.dproj
trunk/jvcl/packages/d11/JvStdCtrls.rc
trunk/jvcl/packages/d11/JvStdCtrls.res
trunk/jvcl/packages/d11/JvStdCtrlsDesign.dproj
trunk/jvcl/packages/d11/JvStdCtrlsDesign.rc
trunk/jvcl/packages/d11/JvStdCtrlsDesign.res
trunk/jvcl/packages/d11/JvSystem.dproj
trunk/jvcl/packages/d11/JvSystem.rc
trunk/jvcl/packages/d11/JvSystem.res
trunk/jvcl/packages/d11/JvSystemDesign.dproj
trunk/jvcl/packages/d11/JvSystemDesign.rc
trunk/jvcl/packages/d11/JvSystemDesign.res
trunk/jvcl/packages/d11/JvTimeFramework.dproj
trunk/jvcl/packages/d11/JvTimeFramework.rc
trunk/jvcl/packages/d11/JvTimeFramework.res
trunk/jvcl/packages/d11/JvTimeFrameworkDesign.dproj
trunk/jvcl/packages/d11/JvTimeFrameworkDesign.rc
trunk/jvcl/packages/d11/JvTimeFrameworkDesign.res
trunk/jvcl/packages/d11/JvWizards.dproj
trunk/jvcl/packages/d11/JvWizards.rc
trunk/jvcl/packages/d11/JvWizards.res
trunk/jvcl/packages/d11/JvWizardsDesign.dproj
trunk/jvcl/packages/d11/JvWizardsDesign.rc
trunk/jvcl/packages/d11/JvWizardsDesign.res
trunk/jvcl/packages/d11/JvXPCtrls.dproj
trunk/jvcl/packages/d11/JvXPCtrls.rc
trunk/jvcl/packages/d11/JvXPCtrls.res
trunk/jvcl/packages/d11/JvXPCtrlsDesign.dproj
trunk/jvcl/packages/d11/JvXPCtrlsDesign.rc
trunk/jvcl/packages/d11/JvXPCtrlsDesign.res
trunk/jvcl/packages/d12/JvAppFrm.dproj
trunk/jvcl/packages/d12/JvAppFrm.rc
trunk/jvcl/packages/d12/JvAppFrm.res
trunk/jvcl/packages/d12/JvAppFrmDesign.dproj
trunk/jvcl/packages/d12/JvAppFrmDesign.rc
trunk/jvcl/packages/d12/JvAppFrmDesign.res
trunk/jvcl/packages/d12/JvBDE.dproj
trunk/jvcl/packages/d12/JvBDE.rc
trunk/jvcl/packages/d12/JvBDE.res
trunk/jvcl/packages/d12/JvBDEDesign.dproj
trunk/jvcl/packages/d12/JvBDEDesign.rc
trunk/jvcl/packages/d12/JvBDEDesign.res
trunk/jvcl/packages/d12/JvBands.dproj
trunk/jvcl/packages/d12/JvBands.rc
trunk/jvcl/packages/d12/JvBands.res
trunk/jvcl/packages/d12/JvBandsDesign.dproj
trunk/jvcl/packages/d12/JvBandsDesign.rc
trunk/jvcl/packages/d12/JvBandsDesign.res
trunk/jvcl/packages/d12/JvCmp.dproj
trunk/jvcl/packages/d12/JvCmp.rc
trunk/jvcl/packages/d12/JvCmp.res
trunk/jvcl/packages/d12/JvCmpDesign.dproj
trunk/jvcl/packages/d12/JvCmpDesign.rc
trunk/jvcl/packages/d12/JvCmpDesign.res
trunk/jvcl/packages/d12/JvControls.dproj
trunk/jvcl/packages/d12/JvControls.rc
trunk/jvcl/packages/d12/JvControls.res
trunk/jvcl/packages/d12/JvControlsDesign.dproj
trunk/jvcl/packages/d12/JvControlsDesign.rc
trunk/jvcl/packages/d12/JvControlsDesign.res
trunk/jvcl/packages/d12/JvCore.dproj
trunk/jvcl/packages/d12/JvCore.rc
trunk/jvcl/packages/d12/JvCore.res
trunk/jvcl/packages/d12/JvCoreDesign.dproj
trunk/jvcl/packages/d12/JvCoreDesign.rc
trunk/jvcl/packages/d12/JvCoreDesign.res
trunk/jvcl/packages/d12/JvCrypt.dproj
trunk/jvcl/packages/d12/JvCrypt.rc
trunk/jvcl/packages/d12/JvCrypt.res
trunk/jvcl/packages/d12/JvCryptDesign.dproj
trunk/jvcl/packages/d12/JvCryptDesign.rc
trunk/jvcl/packages/d12/JvCryptDesign.res
trunk/jvcl/packages/d12/JvCustom.dproj
trunk/jvcl/packages/d12/JvCustom.rc
trunk/jvcl/packages/d12/JvCustom.res
trunk/jvcl/packages/d12/JvCustomDesign.dproj
trunk/jvcl/packages/d12/JvCustomDesign.rc
trunk/jvcl/packages/d12/JvCustomDesign.res
trunk/jvcl/packages/d12/JvDB.dproj
trunk/jvcl/packages/d12/JvDB.rc
trunk/jvcl/packages/d12/JvDB.res
trunk/jvcl/packages/d12/JvDBDesign.dproj
trunk/jvcl/packages/d12/JvDBDesign.rc
trunk/jvcl/packages/d12/JvDBDesign.res
trunk/jvcl/packages/d12/JvDlgs.dproj
trunk/jvcl/packages/d12/JvDlgs.rc
trunk/jvcl/packages/d12/JvDlgs.res
trunk/jvcl/packages/d12/JvDlgsDesign.dproj
trunk/jvcl/packages/d12/JvDlgsDesign.rc
trunk/jvcl/packages/d12/JvDlgsDesign.res
trunk/jvcl/packages/d12/JvDocking.dproj
trunk/jvcl/packages/d12/JvDocking.rc
trunk/jvcl/packages/d12/JvDocking.res
trunk/jvcl/packages/d12/JvDockingDesign.dproj
trunk/jvcl/packages/d12/JvDockingDesign.rc
trunk/jvcl/packages/d12/JvDockingDesign.res
trunk/jvcl/packages/d12/JvDotNetCtrls.dproj
trunk/jvcl/packages/d12/JvDotNetCtrls.rc
trunk/jvcl/packages/d12/JvDotNetCtrls.res
trunk/jvcl/packages/d12/JvDotNetCtrlsDesign.dproj
trunk/jvcl/packages/d12/JvDotNetCtrlsDesign.rc
trunk/jvcl/packages/d12/JvDotNetCtrlsDesign.res
trunk/jvcl/packages/d12/JvGlobus.dproj
trunk/jvcl/packages/d12/JvGlobus.rc
trunk/jvcl/packages/d12/JvGlobus.res
trunk/jvcl/packages/d12/JvGlobusDesign.dproj
trunk/jvcl/packages/d12/JvGlobusDesign.rc
trunk/jvcl/packages/d12/JvGlobusDesign.res
trunk/jvcl/packages/d12/JvHMI.dproj
trunk/jvcl/packages/d12/JvHMI.rc
trunk/jvcl/packages/d12/JvHMI.res
trunk/jvcl/packages/d12/JvHMIDesign.dproj
trunk/jvcl/packages/d12/JvHMIDesign.rc
trunk/jvcl/packages/d12/JvHMIDesign.res
trunk/jvcl/packages/d12/JvJans.dproj
trunk/jvcl/packages/d12/JvJans.rc
trunk/jvcl/packages/d12/JvJans.res
trunk/jvcl/packages/d12/JvJansDesign.dproj
trunk/jvcl/packages/d12/JvJansDesign.rc
trunk/jvcl/packages/d12/JvJansDesign.res
trunk/jvcl/packages/d12/JvMM.dproj
trunk/jvcl/packages/d12/JvMM.rc
trunk/jvcl/packages/d12/JvMM.res
trunk/jvcl/packages/d12/JvMMDesign.dproj
trunk/jvcl/packages/d12/JvMMDesign.rc
trunk/jvcl/packages/d12/JvMMDesign.res
trunk/jvcl/packages/d12/JvManagedThreads.dproj
trunk/jvcl/packages/d12/JvManagedThreads.rc
trunk/jvcl/packages/d12/JvManagedThreads.res
trunk/jvcl/packages/d12/JvManagedThreadsDesign.dproj
trunk/jvcl/packages/d12/JvManagedThreadsDesign.rc
trunk/jvcl/packages/d12/JvManagedThreadsDesign.res
trunk/jvcl/packages/d12/JvNet.dproj
trunk/jvcl/packages/d12/JvNet.rc
trunk/jvcl/packages/d12/JvNet.res
trunk/jvcl/packages/d12/JvNetDesign.dproj
trunk/jvcl/packages/d12/JvNetDesign.rc
trunk/jvcl/packages/d12/JvNetDesign.res
trunk/jvcl/packages/d12/JvPageComps.dproj
trunk/jvcl/packages/d12/JvPageComps.rc
trunk/jvcl/packages/d12/JvPageComps.res
trunk/jvcl/packages/d12/JvPageCompsDesign.dproj
trunk/jvcl/packages/d12/JvPageCompsDesign.rc
trunk/jvcl/packages/d12/JvPageCompsDesign.res
trunk/jvcl/packages/d12/JvPascalInterpreter.dproj
trunk/jvcl/packages/d12/JvPascalInterpreter.rc
trunk/jvcl/packages/d12/JvPascalInterpreter.res
trunk/jvcl/packages/d12/JvPascalInterpreterDesign.dproj
trunk/jvcl/packages/d12/JvPascalInterpreterDesign.rc
trunk/jvcl/packages/d12/JvPascalInterpreterDesign.res
trunk/jvcl/packages/d12/JvPluginSystem.dproj
trunk/jvcl/packages/d12/JvPluginSystem.rc
trunk/jvcl/packages/d12/JvPluginSystem.res
trunk/jvcl/packages/d12/JvPluginSystemDesign.dproj
trunk/jvcl/packages/d12/JvPluginSystemDesign.rc
trunk/jvcl/packages/d12/JvPluginSystemDesign.res
trunk/jvcl/packages/d12/JvPrintPreview.dproj
trunk/jvcl/packages/d12/JvPrintPreview.rc
trunk/jvcl/packages/d12/JvPrintPreview.res
trunk/jvcl/packages/d12/JvPrintPreviewDesign.dproj
trunk/jvcl/packages/d12/JvPrintPreviewDesign.rc
trunk/jvcl/packages/d12/JvPrintPreviewDesign.res
trunk/jvcl/packages/d12/JvRuntimeDesign.dproj
trunk/jvcl/packages/d12/JvRuntimeDesign.rc
trunk/jvcl/packages/d12/JvRuntimeDesign.res
trunk/jvcl/packages/d12/JvRuntimeDesignDesign.dproj
trunk/jvcl/packages/d12/JvRuntimeDesignDesign.rc
trunk/jvcl/packages/d12/JvRuntimeDesignDesign.res
trunk/jvcl/packages/d12/JvStdCtrls.dproj
trunk/jvcl/packages/d12/JvStdCtrls.rc
trunk/jvcl/packages/d12/JvStdCtrls.res
trunk/jvcl/packages/d12/JvStdCtrlsDesign.dproj
trunk/jvcl/packages/d12/JvStdCtrlsDesign.rc
trunk/jvcl/packages/d12/JvStdCtrlsDesign.res
trunk/jvcl/packages/d12/JvSystem.dproj
trunk/jvcl/packages/d12/JvSystem.rc
trunk/jvcl/packages/d12/JvSystem.res
trunk/jvcl/packages/d12/JvSystemDesign.dproj
trunk/jvcl/packages/d12/JvSystemDesign.rc
trunk/jvcl/packages/d12/JvSystemDesign.res
trunk/jvcl/packages/d12/JvTimeFramework.dproj
trunk/jvcl/packages/d12/JvTimeFramework.rc
trunk/jvcl/packages/d12/JvTimeFramework.res
trunk/jvcl/packages/d12/JvTimeFrameworkDesign.dproj
trunk/jvcl/packages/d12/JvTimeFrameworkDesign.rc
trunk/jvcl/packages/d12/JvTimeFrameworkDesign.res
trunk/jvcl/packages/d12/JvWizards.dproj
trunk/jvcl/packages/d12/JvWizards.rc
trunk/jvcl/packages/d12/JvWizards.res
trunk/jvcl/packages/d12/JvWizardsDesign.dproj
trunk/jvcl/packages/d12/JvWizardsDesign.rc
trunk/jvcl/packages/d12/JvWizardsDesign.res
trunk/jvcl/packages/d12/JvXPCtrls.dproj
trunk/jvcl/packages/d12/JvXPCtrls.rc
trunk/jvcl/packages/d12/JvXPCtrls.res
trunk/jvcl/packages/d12/JvXPCtrlsDesign.dproj
trunk/jvcl/packages/d12/JvXPCtrlsDesign.rc
trunk/jvcl/packages/d12/JvXPCtrlsDesign.res
trunk/jvcl/packages/d14/JvAppFrm.dproj
trunk/jvcl/packages/d14/JvAppFrm.rc
trunk/jvcl/packages/d14/JvAppFrm.res
trunk/jvcl/packages/d14/JvAppFrmDesign.dproj
trunk/jvcl/packages/d14/JvAppFrmDesign.rc
trunk/jvcl/packages/d14/JvAppFrmDesign.res
trunk/jvcl/packages/d14/JvBDE.dproj
trunk/jvcl/packages/d14/JvBDE.rc
trunk/jvcl/packages/d14/JvBDE.res
trunk/jvcl/packages/d14/JvBDEDesign.dproj
trunk/jvcl/packages/d14/JvBDEDesign.rc
trunk/jvcl/packages/d14/JvBDEDesign.res
trunk/jvcl/packages/d14/JvBands.dproj
trunk/jvcl/packages/d14/JvBands.rc
trunk/jvcl/packages/d14/JvBands.res
trunk/jvcl/packages/d14/JvBandsDesign.dproj
trunk/jvcl/packages/d14/JvBandsDesign.rc
trunk/jvcl/packages/d14/JvBandsDesign.res
trunk/jvcl/packages/d14/JvCmp.dproj
trunk/jvcl/packages/d14/JvCmp.rc
trunk/jvcl/packages/d14/JvCmp.res
trunk/jvcl/packages/d14/JvCmpDesign.dproj
trunk/jvcl/packages/d14/JvCmpDesign.rc
trunk/jvcl/packages/d14/JvCmpDesign.res
trunk/jvcl/packages/d14/JvControls.dproj
trunk/jvcl/packages/d14/JvControls.rc
trunk/jvcl/packages/d14/JvControls.res
trunk/jvcl/packages/d14/JvControlsDesign.dproj
trunk/jvcl/packages/d14/JvControlsDesign.rc
trunk/jvcl/packages/d14/JvControlsDesign.res
trunk/jvcl/packages/d14/JvCore.dproj
trunk/jvcl/packages/d14/JvCore.rc
trunk/jvcl/packages/d14/JvCore.res
trunk/jvcl/packages/d14/JvCoreDesign.dproj
trunk/jvcl/packages/d14/JvCoreDesign.rc
trunk/jvcl/packages/d14/JvCoreDesign.res
trunk/jvcl/packages/d14/JvCrypt.dproj
trunk/jvcl/packages/d14/JvCrypt.rc
trunk/jvcl/packages/d14/JvCrypt.res
trunk/jvcl/packages/d14/JvCryptDesign.dproj
trunk/jvcl/packages/d14/JvCryptDesign.rc
trunk/jvcl/packages/d14/JvCryptDesign.res
trunk/jvcl/packages/d14/JvCustom.dproj
trunk/jvcl/packages/d14/JvCustom.rc
trunk/jvcl/packages/d14/JvCustom.res
trunk/jvcl/packages/d14/JvCustomDesign.dproj
trunk/jvcl/packages/d14/JvCustomDesign.rc
trunk/jvcl/packages/d14/JvCustomDesign.res
trunk/jvcl/packages/d14/JvDB.dproj
trunk/jvcl/packages/d14/JvDB.rc
trunk/jvcl/packages/d14/JvDB.res
trunk/jvcl/packages/d14/JvDBDesign.dproj
trunk/jvcl/packages/d14/JvDBDesign.rc
trunk/jvcl/packages/d14/JvDBDesign.res
trunk/jvcl/packages/d14/JvDlgs.dproj
trunk/jvcl/packages/d14/JvDlgs.rc
trunk/jvcl/packages/d14/JvDlgs.res
trunk/jvcl/packages/d14/JvDlgsDesign.dproj
trunk/jvcl/packages/d14/JvDlgsDesign.rc
trunk/jvcl/packages/d14/JvDlgsDesign.res
trunk/jvcl/packages/d14/JvDocking.dproj
trunk/jvcl/packages/d14/JvDocking.rc
trunk/jvcl/packages/d14/JvDocking.res
trunk/jvcl/packages/d14/JvDockingDesign.dproj
trunk/jvcl/packages/d14/JvDockingDesign.rc
trunk/jvcl/packages/d14/JvDockingDesign.res
trunk/jvcl/packages/d14/JvDotNetCtrls.dproj
trunk/jvcl/packages/d14/JvDotNetCtrls.rc
trunk/jvcl/packages/d14/JvDotNetCtrls.res
trunk/jvcl/packages/d14/JvDotNetCtrlsDesign.dproj
trunk/jvcl/packages/d14/JvDotNetCtrlsDesign.rc
trunk/jvcl/packages/d14/JvDotNetCtrlsDesign.res
trunk/jvcl/packages/d14/JvGlobus.dproj
trunk/jvcl/packages/d14/JvGlobus.rc
trunk/jvcl/packages/d14/JvGlobus.res
trunk/jvcl/packages/d14/JvGlobusDesign.dproj
trunk/jvcl/packages/d14/JvGlobusDesign.rc
trunk/jvcl/packages/d14/JvGlobusDesign.res
trunk/jvcl/packages/d14/JvHMI.dproj
trunk/jvcl/packages/d14/JvHMI.rc
trunk/jvcl/packages/d14/JvHMI.res
trunk/jvcl/packages/d14/JvHMIDesign.dproj
trunk/jvcl/packages/d14/JvHMIDesign.rc
trunk/jvcl/packages/d14/JvHMIDesign.res
trunk/jvcl/packages/d14/JvJans.dproj
trunk/jvcl/packages/d14/JvJans.rc
trunk/jvcl/packages/d14/JvJans.res
trunk/jvcl/packages/d14/JvJansDesign.dproj
trunk/jvcl/packages/d14/JvJansDesign.rc
trunk/jvcl/packages/d14/JvJansDesign.res
trunk/jvcl/packages/d14/JvMM.dproj
trunk/jvcl/packages/d14/JvMM.rc
trunk/jvcl/packages/d14/JvMM.res
trunk/jvcl/packages/d14/JvMMDesign.dproj
trunk/jvcl/packages/d14/JvMMDesign.rc
trunk/jvcl/packages/d14/JvMMDesign.res
trunk/jvcl/packages/d14/JvManagedThreads.dproj
trunk/jvcl/packages/d14/JvManagedThreads.rc
trunk/jvcl/packages/d14/JvManagedThreads.res
trunk/jvcl/packages/d14/JvManagedThreadsDesign.dproj
trunk/jvcl/packages/d14/JvManagedThreadsDesign.rc
trunk/jvcl/packages/d14/JvManagedThreadsDesign.res
trunk/jvcl/packages/d14/JvNet.dproj
trunk/jvcl/packages/d14/JvNet.rc
trunk/jvcl/packages/d14/JvNet.res
trunk/jvcl/packages/d14/JvNetDesign.dproj
trunk/jvcl/packages/d14/JvNetDesign.rc
trunk/jvcl/packages/d14/JvNetDesign.res
trunk/jvcl/packages/d14/JvPageComps.dproj
trunk/jvcl/packages/d14/JvPageComps.rc
trunk/jvcl/packages/d14/JvPageComps.res
trunk/jvcl/packages/d14/JvPageCompsDesign.dproj
trunk/jvcl/packages/d14/JvPageCompsDesign.rc
trunk/jvcl/packages/d14/JvPageCompsDesign.res
trunk/jvcl/packages/d14/JvPascalInterpreter.dproj
trunk/jvcl/packages/d14/JvPascalInterpreter.rc
trunk/jvcl/packages/d14/JvPascalInterpreter.res
trunk/jvcl/packages/d14/JvPascalInterpreterDesign.dproj
trunk/jvcl/packages/d14/JvPascalInterpreterDesign.rc
trunk/jvcl/packages/d14/JvPascalInterpreterDesign.res
trunk/jvcl/packages/d14/JvPluginSystem.dproj
trunk/jvcl/packages/d14/JvPluginSystem.rc
trunk/jvcl/packages/d14/JvPluginSystem.res
trunk/jvcl/packages/d14/JvPluginSystemDesign.dproj
trunk/jvcl/packages/d14/JvPluginSystemDesign.rc
trunk/jvcl/packages/d14/JvPluginSystemDesign.res
trunk/jvcl/packages/d14/JvPrintPreview.dproj
trunk/jvcl/packages/d14/JvPrintPreview.rc
trunk/jvcl/packages/d14/JvPrintPreview.res
trunk/jvcl/packages/d14/JvPrintPreviewDesign.dproj
trunk/jvcl/packages/d14/JvPrintPreviewDesign.rc
trunk/jvcl/packages/d14/JvPrintPreviewDesign.res
trunk/jvcl/packages/d14/JvRuntimeDesign.dproj
trunk/jvcl/packages/d14/JvRuntimeDesign.rc
trunk/jvcl/packages/d14/JvRuntimeDesign.res
trunk/jvcl/packages/d14/JvRuntimeDesignDesign.dproj
trunk/jvcl/packages/d14/JvRuntimeDesignDesign.rc
trunk/jvcl/packages/d14/JvRuntimeDesignDesign.res
trunk/jvcl/packages/d14/JvStdCtrls.dproj
trunk/jvcl/packages/d14/JvStdCtrls.rc
trunk/jvcl/packages/d14/JvStdCtrls.res
trunk/jvcl/packages/d14/JvStdCtrlsDesign.dproj
trunk/jvcl/packages/d14/JvStdCtrlsDesign.rc
trunk/jvcl/packages/d14/JvStdCtrlsDesign.res
trunk/jvcl/packages/d14/JvSystem.dproj
trunk/jvcl/packages/d14/JvSystem.rc
trunk/jvcl/packages/d14/JvSystem.res
trunk/jvcl/packages/d14/JvSystemDesign.dproj
trunk/jvcl/packages/d14/JvSystemDesign.rc
trunk/jvcl/packages/d14/JvSystemDesign.res
trunk/jvcl/packages/d14/JvTimeFramework.dproj
trunk/jvcl/packages/d14/JvTimeFramework.rc
trunk/jvcl/packages/d14/JvTimeFramework.res
trunk/jvcl/packages/d14/JvTimeFrameworkDesign.dproj
trunk/jvcl/packages/d14/JvTimeFrameworkDesign.rc
trunk/jvcl/packages/d14/JvTimeFrameworkDesign.res
trunk/jvcl/packages/d14/JvWizards.dproj
trunk/jvcl/packages/d14/JvWizards.rc
trunk/jvcl/packages/d14/JvWizards.res
trunk/jvcl/packages/d14/JvWizardsDesign.dproj
trunk/jvcl/packages/d14/JvWizardsDesign.rc
trunk/jvcl/packages/d14/JvWizardsDesign.res
trunk/jvcl/packages/d14/JvXPCtrls.dproj
trunk/jvcl/packages/d14/JvXPCtrls.rc
trunk/jvcl/packages/d14/JvXPCtrls.res
trunk/jvcl/packages/d14/JvXPCtrlsDesign.dproj
trunk/jvcl/packages/d14/JvXPCtrlsDesign.rc
trunk/jvcl/packages/d14/JvXPCtrlsDesign.res
trunk/jvcl/packages/d15/JvAppFrm.dproj
trunk/jvcl/packages/d15/JvAppFrm.rc
trunk/jvcl/packages/d15/JvAppFrm.res
trunk/jvcl/packages/d15/JvAppFrmDesign.dproj
trunk/jvcl/packages/d15/JvAppFrmDesign.rc
trunk/jvcl/packages/d15/JvAppFrmDesign.res
trunk/jvcl/packages/d15/JvBDE.dproj
trunk/jvcl/packages/d15/JvBDE.rc
trunk/jvcl/packages/d15/JvBDE.res
trunk/jvcl/packages/d15/JvBDEDesign.dproj
trunk/jvcl/packages/d15/JvBDEDesign.rc
trunk/jvcl/packages/d15/JvBDEDesign.res
trunk/jvcl/packages/d15/JvBands.dproj
trunk/jvcl/packages/d15/JvBands.rc
trunk/jvcl/packages/d15/JvBands.res
trunk/jvcl/packages/d15/JvBandsDesign.dproj
trunk/jvcl/packages/d15/JvBandsDesign.rc
trunk/jvcl/packages/d15/JvBandsDesign.res
trunk/jvcl/packages/d15/JvCmp.dproj
trunk/jvcl/packages/d15/JvCmp.rc
trunk/jvcl/packages/d15/JvCmp.res
trunk/jvcl/packages/d15/JvCmpDesign.dproj
trunk/jvcl/packages/d15/JvCmpDesign.rc
trunk/jvcl/packages/d15/JvCmpDesign.res
trunk/jvcl/packages/d15/JvControls.dproj
trunk/jvcl/packages/d15/JvControls.rc
trunk/jvcl/packages/d15/JvControls.res
trunk/jvcl/packages/d15/JvControlsDesign.dproj
trunk/jvcl/packages/d15/JvControlsDesign.rc
trunk/jvcl/packages/d15/JvControlsDesign.res
trunk/jvcl/packages/d15/JvCore.dproj
trunk/jvcl/packages/d15/JvCore.rc
trunk/jvcl/packages/d15/JvCore.res
trunk/jvcl/packages/d15/JvCoreDesign.dproj
trunk/jvcl/packages/d15/JvCoreDesign.rc
trunk/jvcl/packages/d15/JvCoreDesign.res
trunk/jvcl/packages/d15/JvCrypt.dproj
trunk/jvcl/packages/d15/JvCrypt.rc
trunk/jvcl/packages/d15/JvCrypt.res
trunk/jvcl/packages/d15/JvCryptDesign.dproj
trunk/jvcl/packages/d15/JvCryptDesign.rc
trunk/jvcl/packages/d15/JvCryptDesign.res
trunk/jvcl/packages/d15/JvCustom.dproj
trunk/jvcl/packages/d15/JvCustom.rc
trunk/jvcl/packages/d15/JvCustom.res
trunk/jvcl/packages/d15/JvCustomDesign.dproj
trunk/jvcl/packages/d15/JvCustomDesign.rc
trunk/jvcl/packages/d15/JvCustomDesign.res
trunk/jvcl/packages/d15/JvDB.dproj
trunk/jvcl/packages/d15/JvDB.rc
trunk/jvcl/packages/d15/JvDB.res
trunk/jvcl/packages/d15/JvDBDesign.dproj
trunk/jvcl/packages/d15/JvDBDesign.rc
trunk/jvcl/packages/d15/JvDBDesign.res
trunk/jvcl/packages/d15/JvDlgs.dproj
trunk/jvcl/packages/d15/JvDlgs.rc
trunk/jvcl/packages/d15/JvDlgs.res
trunk/jvcl/packages/d15/JvDlgsDesign.dproj
trunk/jvcl/packages/d15/JvDlgsDesign.rc
trunk/jvcl/packages/d15/JvDlgsDesign.res
trunk/jvcl/packages/d15/JvDocking.dproj
trunk/jvcl/packages/d15/JvDocking.rc
trunk/jvcl/packages/d15/JvDocking.res
trunk/jvcl/packages/d15/JvDockingDesign.dproj
trunk/jvcl/packages/d15/JvDockingDesign.rc
trunk/jvcl/packages/d15/JvDockingDesign.res
trunk/jvcl/packages/d15/JvDotNetCtrls.dproj
trunk/jvcl/packages/d15/JvDotNetCtrls.rc
trunk/jvcl/packages/d15/JvDotNetCtrls.res
trunk/jvcl/packages/d15/JvDotNetCtrlsDesign.dproj
trunk/jvcl/packages/d15/JvDotNetCtrlsDesign.rc
trunk/jvcl/packages/d15/JvDotNetCtrlsDesign.res
trunk/jvcl/packages/d15/JvGlobus.dproj
trunk/jvcl/packages/d15/JvGlobus.rc
trunk/jvcl/packages/d15/JvGlobus.res
trunk/jvcl/packages/d15/JvGlobusDesign.dproj
trunk/jvcl/packages/d15/JvGlobusDesign.rc
trunk/jvcl/packages/d15/JvGlobusDesign.res
trunk/jvcl/packages/d15/JvHMI.dproj
trunk/jvcl/packages/d15/JvHMI.rc
trunk/jvcl/packages/d15/JvHMI.res
trunk/jvcl/packages/d15/JvHMIDesign.dproj
trunk/jvcl/packages/d15/JvHMIDesign.rc
trunk/jvcl/packages/d15/JvHMIDesign.res
trunk/jvcl/packages/d15/JvJans.dproj
trunk/jvcl/packages/d15/JvJans.rc
trunk/jvcl/packages/d15/JvJans.res
trunk/jvcl/packages/d15/JvJansDesign.dproj
trunk/jvcl/packages/d15/JvJansDesign.rc
trunk/jvcl/packages/d15/JvJansDesign.res
trunk/jvcl/packages/d15/JvMM.dproj
trunk/jvcl/packages/d15/JvMM.rc
trunk/jvcl/packages/d15/JvMM.res
trunk/jvcl/packages/d15/JvMMDesign.dproj
trunk/jvcl/packages/d15/JvMMDesign.rc
trunk/jvcl/packages/d15/JvMMDesign.res
trunk/jvcl/packages/d15/JvManagedThreads.dproj
trunk/jvcl/packages/d15/JvManagedThreads.rc
trunk/jvcl/packages/d15/JvManagedThreads.res
trunk/jvcl/packages/d15/JvManagedThreadsDesign.dproj
trunk/jvcl/packages/d15/JvManagedThreadsDesign.rc
trunk/jvcl/packages/d15/JvManagedThreadsDesign.res
trunk/jvcl/packages/d15/JvNet.dproj
trunk/jvcl/packages/d15/JvNet.rc
trunk/jvcl/packages/d15/JvNet.res
trunk/jvcl/packages/d15/JvNetDesign.dproj
trunk/jvcl/packages/d15/JvNetDesign.rc
trunk/jvcl/packages/d15/JvNetDesign.res
trunk/jvcl/packages/d15/JvPageComps.dproj
trunk/jvcl/packages/d15/JvPageComps.rc
trunk/jvcl/packages/d15/JvPageComps.res
trunk/jvcl/packages/d15/JvPageCompsDesign.dproj
trunk/jvcl/packages/d15/JvPageCompsDesign.rc
trunk/jvcl/packages/d15/JvPageCompsDesign.res
trunk/jvcl/packages/d15/JvPascalInterpreter.dproj
trunk/jvcl/packages/d15/JvPascalInterpreter.rc
trunk/jvcl/packages/d15/JvPascalInterpreter.res
trunk/jvcl/packages/d15/JvPascalInterpreterDesign.dproj
trunk/jvcl/packages/d15/JvPascalInterpreterDesign.rc
trunk/jvcl/packages/d15/JvPascalInterpreterDesign.res
trunk/jvcl/packages/d15/JvPluginSystem.dproj
trunk/jvcl/packages/d15/JvPluginSystem.rc
trunk/jvcl/packages/d15/JvPluginSystem.res
trunk/jvcl/packages/d15/JvPluginSystemDesign.dproj
trunk/jvcl/packages/d15/JvPluginSystemDesign.rc
trunk/jvcl/packages/d15/JvPluginSystemDesign.res
trunk/jvcl/packages/d15/JvPrintPreview.dproj
trunk/jvcl/packages/d15/JvPrintPreview.rc
trunk/jvcl/packages/d15/JvPrintPreview.res
trunk/jvcl/packages/d15/JvPrintPreviewDesign.dproj
trunk/jvcl/packages/d15/JvPrintPreviewDesign.rc
trunk/jvcl/packages/d15/JvPrintPreviewDesign.res
trunk/jvcl/packages/d15/JvRuntimeDesign.dproj
trunk/jvcl/packages/d15/JvRuntimeDesign.rc
trunk/jvcl/packages/d15/JvRuntimeDesign.res
trunk/jvcl/packages/d15/JvRuntimeDesignDesign.dproj
trunk/jvcl/packages/d15/JvRuntimeDesignDesign.rc
trunk/jvcl/packages/d15/JvRuntimeDesignDesign.res
trunk/jvcl/packages/d15/JvStdCtrls.dproj
trunk/jvcl/packages/d15/JvStdCtrls.rc
trunk/jvcl/packages/d15/JvStdCtrls.res
trunk/jvcl/packages/d15/JvStdCtrlsDesign.dproj
trunk/jvcl/packages/d15/JvStdCtrlsDesign.rc
trunk/jvcl/packages/d15/JvStdCtrlsDesign.res
trunk/jvcl/packages/d15/JvSystem.dproj
trunk/jvcl/packages/d15/JvSystem.rc
trunk/jvcl/packages/d15/JvSystem.res
trunk/jvcl/packages/d15/JvSystemDesign.dproj
trunk/jvcl/packages/d15/JvSystemDesign.rc
trunk/jvcl/packages/d15/JvSystemDesign.res
trunk/jvcl/packages/d15/JvTimeFramework.dproj
trunk/jvcl/packages/d15/JvTimeFramework.rc
trunk/jvcl/packages/d15/JvTimeFramework.res
trunk/jvcl/packages/d15/JvTimeFrameworkDesign.dproj
trunk/jvcl/packages/d15/JvTimeFrameworkDesign.rc
trunk/jvcl/packages/d15/JvTimeFrameworkDesign.res
trunk/jvcl/packages/d15/JvWizards.dproj
trunk/jvcl/packages/d15/JvWizards.rc
trunk/jvcl/packages/d15/JvWizards.res
trunk/jvcl/packages/d15/JvWizardsDesign.dproj
trunk/jvcl/packages/d15/JvWizardsDesign.rc
trunk/jvcl/packages/d15/JvWizardsDesign.res
trunk/jvcl/packages/d15/JvXPCtrls.dproj
trunk/jvcl/packages/d15/JvXPCtrls.rc
trunk/jvcl/packages/d15/JvXPCtrls.res
trunk/jvcl/packages/d15/JvXPCtrlsDesign.dproj
trunk/jvcl/packages/d15/JvXPCtrlsDesign.rc
trunk/jvcl/packages/d15/JvXPCtrlsDesign.res
trunk/jvcl/packages/d16/JvAppFrm.dproj
trunk/jvcl/packages/d16/JvAppFrm.rc
trunk/jvcl/packages/d16/JvAppFrm.res
trunk/jvcl/packages/d16/JvAppFrmDesign.dproj
trunk/jvcl/packages/d16/JvAppFrmDesign.rc
trunk/jvcl/packages/d16/JvAppFrmDesign.res
trunk/jvcl/packages/d16/JvBDE.dproj
trunk/jvcl/packages/d16/JvBDE.rc
trunk/jvcl/packages/d16/JvBDE.res
trunk/jvcl/packages/d16/JvBDEDesign.dproj
trunk/jvcl/packages/d16/JvBDEDesign.rc
trunk/jvcl/packages/d16/JvBDEDesign.res
trunk/jvcl/packages/d16/JvBands.dproj
trunk/jvcl/packages/d16/JvBands.rc
trunk/jvcl/packages/d16/JvBands.res
trunk/jvcl/packages/d16/JvBandsDesign.dproj
trunk/jvcl/packages/d16/JvBandsDesign.rc
trunk/jvcl/packages/d16/JvBandsDesign.res
trunk/jvcl/packages/d16/JvCmp.dproj
trunk/jvcl/packages/d16/JvCmp.rc
trunk/jvcl/packages/d16/JvCmp.res
trunk/jvcl/packages/d16/JvCmpDesign.dproj
trunk/jvcl/packages/d16/JvCmpDesign.rc
trunk/jvcl/packages/d16/JvCmpDesign.res
trunk/jvcl/packages/d16/JvControls.dproj
trunk/jvcl/packages/d16/JvControls.rc
trunk/jvcl/packages/d16/JvControls.res
trunk/jvcl/packages/d16/JvControlsDesign.dproj
trunk/jvcl/packages/d16/JvControlsDesign.rc
trunk/jvcl/packages/d16/JvControlsDesign.res
trunk/jvcl/packages/d16/JvCore.dproj
trunk/jvcl/packages/d16/JvCore.rc
trunk/jvcl/packages/d16/JvCore.res
trunk/jvcl/packages/d16/JvCoreDesign.dproj
trunk/jvcl/packages/d16/JvCoreDesign.rc
trunk/jvcl/packages/d16/JvCoreDesign.res
trunk/jvcl/packages/d16/JvCrypt.dproj
trunk/jvcl/packages/d16/JvCrypt.rc
trunk/jvcl/packages/d16/JvCrypt.res
trunk/jvcl/packages/d16/JvCryptDesign.dproj
trunk/jvcl/packages/d16/JvCryptDesign.rc
trunk/jvcl/packages/d16/JvCryptDesign.res
trunk/jvcl/packages/d16/JvCustom.dproj
trunk/jvcl/packages/d16/JvCustom.rc
trunk/jvcl/packages/d16/JvCustom.res
trunk/jvcl/packages/d16/JvCustomDesign.dproj
trunk/jvcl/packages/d16/JvCustomDesign.rc
trunk/jvcl/packages/d16/JvCustomDesign.res
trunk/jvcl/packages/d16/JvDB.dproj
trunk/jvcl/packages/d16/JvDB.rc
trunk/jvcl/packages/d16/JvDB.res
trunk/jvcl/packages/d16/JvDBDesign.dproj
trunk/jvcl/packages/d16/JvDBDesign.rc
trunk/jvcl/packages/d16/JvDBDesign.res
trunk/jvcl/packages/d16/JvDlgs.dproj
trunk/jvcl/packages/d16/JvDlgs.rc
trunk/jvcl/packages/d16/JvDlgs.res
trunk/jvcl/packages/d16/JvDlgsDesign.dproj
trunk/jvcl/packages/d16/JvDlgsDesign.rc
trunk/jvcl/packages/d16/JvDlgsDesign.res
trunk/jvcl/packages/d16/JvDocking.dproj
trunk/jvcl/packages/d16/JvDocking.rc
trunk/jvcl/packages/d16/JvDocking.res
trunk/jvcl/packages/d16/JvDockingDesign.dproj
trunk/jvcl/packages/d16/JvDockingDesign.rc
trunk/jvcl/packages/d16/JvDockingDesign.res
trunk/jvcl/packages/d16/JvDotNetCtrls.dproj
trunk/jvcl/packages/d16/JvDotNetCtrls.rc
trunk/jvcl/packages/d16/JvDotNetCtrls.res
trunk/jvcl/packages/d16/JvDotNetCtrlsDesign.dproj
trunk/jvcl/packages/d16/JvDotNetCtrlsDesign.rc
trunk/jvcl/packages/d16/JvDotNetCtrlsDesign.res
trunk/jvcl/packages/d16/JvGlobus.dproj
trunk/jvcl/packages/d16/JvGlobus.rc
trunk/jvcl/packages/d16/JvGlobus.res
trunk/jvcl/packages/d16/JvGlobusDesign.dproj
trunk/jvcl/packages/d16/JvGlobusDesign.rc
trunk/jvcl/packages/d16/JvGlobusDesign.res
trunk/jvcl/packages/d16/JvHMI.dproj
trunk/jvcl/packages/d16/JvHMI.rc
trunk/jvcl/packages/d16/JvHMI.res
trunk/jvcl/packages/d16/JvHMIDesign.dproj
trunk/jvcl/packages/d16/JvHMIDesign.rc
trunk/jvcl/packages/d16/JvHMIDesign.res
trunk/jvcl/packages/d16/JvJans.dproj
trunk/jvcl/packages/d16/JvJans.rc
trunk/jvcl/packages/d16/JvJans.res
trunk/jvcl/packages/d16/JvJansDesign.dproj
trunk/jvcl/packages/d16/JvJansDesign.rc
trunk/jvcl/packages/d16/JvJansDesign.res
trunk/jvcl/packages/d16/JvMM.dproj
trunk/jvcl/packages/d16/JvMM.rc
trunk/jvcl/packages/d16/JvMM.res
trunk/jvcl/packages/d16/JvMMDesign.dproj
trunk/jvcl/packages/d16/JvMMDesign.rc
trunk/jvcl/packages/d16/JvMMDesign.res
trunk/jvcl/packages/d16/JvManagedThreads.dproj
trunk/jvcl/packages/d16/JvManagedThreads.rc
trunk/jvcl/packages/d16/JvManagedThreads.res
trunk/jvcl/packages/d16/JvManagedThreadsDesign.dproj
trunk/jvcl/packages/d16/JvManagedThreadsDesign.rc
trunk/jvcl/packages/d16/JvManagedThreadsDesign.res
trunk/jvcl/packages/d16/JvNet.dproj
trunk/jvcl/packages/d16/JvNet.rc
trunk/jvcl/packages/d16/JvNet.res
trunk/jvcl/packages/d16/JvNetDesign.dproj
trunk/jvcl/packages/d16/JvNetDesign.rc
trunk/jvcl/packages/d16/JvNetDesign.res
trunk/jvcl/packages/d16/JvPageComps.dproj
trunk/jvcl/packages/d16/JvPageComps.rc
trunk/jvcl/packages/d16/JvPageComps.res
trunk/jvcl/packages/d16/JvPageCompsDesign.dproj
trunk/jvcl/packages/d16/JvPageCompsDesign.rc
trunk/jvcl/packages/d16/JvPageCompsDesign.res
trunk/jvcl/packages/d16/JvPascalInterpreter.dproj
trunk/jvcl/packages/d16/JvPascalInterpreter.rc
trunk/jvcl/packages/d16/JvPascalInterpreter.res
trunk/jvcl/packages/d16/JvPascalInterpreterDesign.dproj
trunk/jvcl/packages/d16/JvPascalInterpreterDesign.rc
trunk/jvcl/packages/d16/JvPascalInterpreterDesign.res
trunk/jvcl/packages/d16/JvPluginSystem.dproj
trunk/jvcl/packages/d16/JvPluginSystem.rc
trunk/jvcl/packages/d16/JvPluginSystem.res
trunk/jvcl/packages/d16/JvPluginSystemDesign.dproj
trunk/jvcl/packages/d16/JvPluginSystemDesign.rc
trunk/jvcl/packages/d16/JvPluginSystemDesign.res
trunk/jvcl/packages/d16/JvPrintPreview.dproj
trunk/jvcl/packages/d16/JvPrintPreview.rc
trunk/jvcl/packages/d16/JvPrintPreview.res
trunk/jvcl/packages/d16/JvPrintPreviewDesign.dproj
trunk/jvcl/packages/d16/JvPrintPreviewDesign.rc
trunk/jvcl/packages/d16/JvPrintPreviewDesign.res
trunk/jvcl/packages/d16/JvRuntimeDesign.dproj
trunk/jvcl/packages/d16/JvRuntimeDesign.rc
trunk/jvcl/packages/d16/JvRuntimeDesign.res
trunk/jvcl/packages/d16/JvRuntimeDesignDesign.dproj
trunk/jvcl/packages/d16/JvRuntimeDesignDesign.rc
trunk/jvcl/packages/d16/JvRuntimeDesignDesign.res
trunk/jvcl/packages/d16/JvStdCtrls.dproj
trunk/jvcl/packages/d16/JvStdCtrls.rc
trunk/jvcl/packages/d16/JvStdCtrls.res
trunk/jvcl/packages/d16/JvStdCtrlsDesign.dproj
trunk/jvcl/packages/d16/JvStdCtrlsDesign.rc
trunk/jvcl/packages/d16/JvStdCtrlsDesign.res
trunk/jvcl/packages/d16/JvSystem.dproj
trunk/jvcl/packages/d16/JvSystem.rc
trunk/jvcl/packages/d16/JvSystem.res
trunk/jvcl/packages/d16/JvSystemDesign.dproj
trunk/jvcl/packages/d16/JvSystemDesign.rc
trunk/jvcl/packages/d16/JvSystemDesign.res
trunk/jvcl/packages/d16/JvTimeFramework.dproj
trunk/jvcl/packages/d16/JvTimeFramework.rc
trunk/jvcl/packages/d16/JvTimeFramework.res
trunk/jvcl/packages/d16/JvTimeFrameworkDesign.dproj
trunk/jvcl/packages/d16/JvTimeFrameworkDesign.rc
trunk/jvcl/packages/d16/JvTimeFrameworkDesign.res
trunk/jvcl/packages/d16/JvWizards.dproj
trunk/jvcl/packages/d16/JvWizards.rc
trunk/jvcl/packages/d16/JvWizards.res
trunk/jvcl/packages/d16/JvWizardsDesign.dproj
trunk/jvcl/packages/d16/JvWizardsDesign.rc
trunk/jvcl/packages/d16/JvWizardsDesign.res
trunk/jvcl/packages/d16/JvXPCtrls.dproj
trunk/jvcl/packages/d16/JvXPCtrls.rc
trunk/jvcl/packages/d16/JvXPCtrls.res
trunk/jvcl/packages/d16/JvXPCtrlsDesign.dproj
trunk/jvcl/packages/d16/JvXPCtrlsDesign.rc
trunk/jvcl/packages/d16/JvXPCtrlsDesign.res
trunk/jvcl/packages/d16_x64/JvAppFrm.dproj
trunk/jvcl/packages/d16_x64/JvAppFrm.rc
trunk/jvcl/packages/d16_x64/JvAppFrm.res
trunk/jvcl/packages/d16_x64/JvBands.dproj
trunk/jvcl/packages/d16_x64/JvBands.rc
trunk/jvcl/packages/d16_x64/JvBands.res
trunk/jvcl/packages/d16_x64/JvCmp.dproj
trunk/jvcl/packages/d16_x64/JvCmp.rc
trunk/jvcl/packages/d16_x64/JvCmp.res
trunk/jvcl/packages/d16_x64/JvControls.dproj
trunk/jvcl/packages/d16_x64/JvControls.rc
trunk/jvcl/packages/d16_x64/JvControls.res
trunk/jvcl/packages/d16_x64/JvCore.dproj
trunk/jvcl/packages/d16_x64/JvCore.rc
trunk/jvcl/packages/d16_x64/JvCore.res
trunk/jvcl/packages/d16_x64/JvCrypt.dproj
trunk/jvcl/packages/d16_x64/JvCrypt.rc
trunk/jvcl/packages/d16_x64/JvCrypt.res
trunk/jvcl/packages/d16_x64/JvCustom.dproj
trunk/jvcl/packages/d16_x64/JvCustom.rc
trunk/jvcl/packages/d16_x64/JvCustom.res
trunk/jvcl/packages/d16_x64/JvDB.dproj
trunk/jvcl/packages/d16_x64/JvDB.rc
trunk/jvcl/packages/d16_x64/JvDB.res
trunk/jvcl/packages/d16_x64/JvDlgs.dproj
trunk/jvcl/packages/d16_x64/JvDlgs.rc
trunk/jvcl/packages/d16_x64/JvDlgs.res
trunk/jvcl/packages/d16_x64/JvDocking.dproj
trunk/jvcl/packages/d16_x64/JvDocking.rc
trunk/jvcl/packages/d16_x64/JvDocking.res
trunk/jvcl/packages/d16_x64/JvDotNetCtrls.dproj
trunk/jvcl/packages/d16_x64/JvDotNetCtrls.rc
trunk/jvcl/packages/d16_x64/JvDotNetCtrls.res
trunk/jvcl/packages/d16_x64/JvGlobus.dproj
trunk/jvcl/packages/d16_x64/JvGlobus.rc
trunk/jvcl/packages/d16_x64/JvGlobus.res
trunk/jvcl/packages/d16_x64/JvHMI.dproj
trunk/jvcl/packages/d16_x64/JvHMI.rc
trunk/jvcl/packages/d16_x64/JvHMI.res
trunk/jvcl/packages/d16_x64/JvJans.dproj
trunk/jvcl/packages/d16_x64/JvJans.rc
trunk/jvcl/packages/d16_x64/JvJans.res
trunk/jvcl/packages/d16_x64/JvMM.dproj
trunk/jvcl/packages/d16_x64/JvMM.rc
trunk/jvcl/packages/d16_x64/JvMM.res
trunk/jvcl/packages/d16_x64/JvManagedThreads.dproj
trunk/jvcl/packages/d16_x64/JvManagedThreads.rc
trunk/jvcl/packages/d16_x64/JvManagedThreads.res
trunk/jvcl/packages/d16_x64/JvNet.dproj
trunk/jvcl/packages/d16_x64/JvNet.rc
trunk/jvcl/packages/d16_x64/JvNet.res
trunk/jvcl/packages/d16_x64/JvPageComps.dproj
trunk/jvcl/packages/d16_x64/JvPageComps.rc
trunk/jvcl/packages/d16_x64/JvPageComps.res
trunk/jvcl/packages/d16_x64/JvPascalInterpreter.dproj
trunk/jvcl/packages/d16_x64/JvPascalInterpreter.rc
trunk/jvcl/packages/d16_x64/JvPascalInterpreter.res
trunk/jvcl/packages/d16_x64/JvPluginSystem.dproj
trunk/jvcl/packages/d16_x64/JvPluginSystem.rc
trunk/jvcl/packages/d16_x64/JvPluginSystem.res
trunk/jvcl/packages/d16_x64/JvPrintPreview.dproj
trunk/jvcl/packages/d16_x64/JvPrintPreview.rc
trunk/jvcl/packages/d16_x64/JvPrintPreview.res
trunk/jvcl/packages/d16_x64/JvRuntimeDesign.dproj
trunk/jvcl/packages/d16_x64/JvRuntimeDesign.rc
trunk/jvcl/packages/d16_x64/JvRuntimeDesign.res
trunk/jvcl/packages/d16_x64/JvStdCtrls.dproj
trunk/jvcl/packages/d16_x64/JvStdCtrls.rc
trunk/jvcl/packages/d16_x64/JvStdCtrls.res
trunk/jvcl/packages/d16_x64/JvSystem.dproj
trunk/jvcl/packages/d16_x64/JvSystem.rc
trunk/jvcl/packages/d16_x64/JvSystem.res
trunk/jvcl/packages/d16_x64/JvTimeFramework.dproj
trunk/jvcl/packages/d16_x64/JvTimeFramework.rc
trunk/jvcl/packages/d16_x64/JvTimeFramework.res
trunk/jvcl/packages/d16_x64/JvWizards.dproj
trunk/jvcl/packages/d16_x64/JvWizards.rc
trunk/jvcl/packages/d16_x64/JvWizards.res
trunk/jvcl/packages/d16_x64/JvXPCtrls.dproj
trunk/jvcl/packages/d16_x64/JvXPCtrls.rc
trunk/jvcl/packages/d16_x64/JvXPCtrls.res
trunk/jvcl/packages/d6/JvAppFrm.rc
trunk/jvcl/packages/d6/JvAppFrm.res
trunk/jvcl/packages/d6/JvAppFrmDesign.rc
trunk/jvcl/packages/d6/JvAppFrmDesign.res
trunk/jvcl/packages/d6/JvBDE.rc
trunk/jvcl/packages/d6/JvBDE.res
trunk/jvcl/packages/d6/JvBDEDesign.rc
trunk/jvcl/packages/d6/JvBDEDesign.res
trunk/jvcl/packages/d6/JvBands.rc
trunk/jvcl/packages/d6/JvBands.res
trunk/jvcl/packages/d6/JvBandsDesign.rc
trunk/jvcl/packages/d6/JvBandsDesign.res
trunk/jvcl/packages/d6/JvCmp.rc
trunk/jvcl/packages/d6/JvCmp.res
trunk/jvcl/packages/d6/JvCmpDesign.rc
trunk/jvcl/packages/d6/JvCmpDesign.res
trunk/jvcl/packages/d6/JvControls.rc
trunk/jvcl/packages/d6/JvControls.res
trunk/jvcl/packages/d6/JvControlsDesign.rc
trunk/jvcl/packages/d6/JvControlsDesign.res
trunk/jvcl/packages/d6/JvCore.rc
trunk/jvcl/packages/d6/JvCore.res
trunk/jvcl/packages/d6/JvCoreDesign.rc
trunk/jvcl/packages/d6/JvCoreDesign.res
trunk/jvcl/packages/d6/JvCrypt.rc
trunk/jvcl/packages/d6/JvCrypt.res
trunk/jvcl/packages/d6/JvCryptDesign.rc
trunk/jvcl/packages/d6/JvCryptDesign.res
trunk/jvcl/packages/d6/JvCustom.rc
trunk/jvcl/packages/d6/JvCustom.res
trunk/jvcl/packages/d6/JvCustomDesign.rc
trunk/jvcl/packages/d6/JvCustomDesign.res
trunk/jvcl/packages/d6/JvDB.rc
trunk/jvcl/packages/d6/JvDB.res
trunk/jvcl/packages/d6/JvDBDesign.rc
trunk/jvcl/packages/d6/JvDBDesign.res
trunk/jvcl/packages/d6/JvDlgs.rc
trunk/jvcl/packages/d6/JvDlgs.res
trunk/jvcl/packages/d6/JvDlgsDesign.rc
trunk/jvcl/packages/d6/JvDlgsDesign.res
trunk/jvcl/packages/d6/JvDocking.rc
trunk/jvcl/packages/d6/JvDocking.res
trunk/jvcl/packages/d6/JvDockingDesign.rc
trunk/jvcl/packages/d6/JvDockingDesign.res
trunk/jvcl/packages/d6/JvDotNetCtrls.rc
trunk/jvcl/packages/d6/JvDotNetCtrls.res
trunk/jvcl/packages/d6/JvDotNetCtrlsDesign.rc
trunk/jvcl/packages/d6/JvDotNetCtrlsDesign.res
trunk/jvcl/packages/d6/JvGlobus.rc
trunk/jvcl/packages/d6/JvGlobus.res
trunk/jvcl/packages/d6/JvGlobusDesign.rc
trunk/jvcl/packages/d6/JvGlobusDesign.res
trunk/jvcl/packages/d6/JvHMI.rc
trunk/jvcl/packages/d6/JvHMI.res
trunk/jvcl/packages/d6/JvHMIDesign.rc
trunk/jvcl/packages/d6/JvHMIDesign.res
trunk/jvcl/packages/d6/JvJans.rc
trunk/jvcl/packages/d6/JvJans.res
trunk/jvcl/packages/d6/JvJansDesign.rc
trunk/jvcl/packages/d6/JvJansDesign.res
trunk/jvcl/packages/d6/JvMM.rc
trunk/jvcl/packages/d6/JvMM.res
trunk/jvcl/packages/d6/JvMMDesign.rc
trunk/jvcl/packages/d6/JvMMDesign.res
trunk/jvcl/packages/d6/JvManagedThreads.rc
trunk/jvcl/packages/d6/JvManagedThreads.res
trunk/jvcl/packages/d6/JvManagedThreadsDesign.rc
trunk/jvcl/packages/d6/JvManagedThreadsDesign.res
trunk/jvcl/packages/d6/JvNet.rc
trunk/jvcl/packages/d6/JvNet.res
trunk/jvcl/packages/d6/JvNetDesign.rc
trunk/jvcl/packages/d6/JvNetDesign.res
trunk/jvcl/packages/d6/JvPageComps.rc
trunk/jvcl/packages/d6/JvPageComps.res
trunk/jvcl/packages/d6/JvPageCompsDesign.rc
trunk/jvcl/packages/d6/JvPageCompsDesign.res
trunk/jvcl/packages/d6/JvPascalInterpreter.rc
trunk/jvcl/packages/d6/JvPascalInterpreter.res
trunk/jvcl/packages/d6/JvPascalInterpreterDesign.rc
trunk/jvcl/packages/d6/JvPascalInterpreterDesign.res
trunk/jvcl/packages/d6/JvPluginSystem.rc
trunk/jvcl/packages/d6/JvPluginSystem.res
trunk/jvcl/packages/d6/JvPluginSystemDesign.rc
trunk/jvcl/packages/d6/JvPluginSystemDesign.res
trunk/jvcl/packages/d6/JvPrintPreview.rc
trunk/jvcl/packages/d6/JvPrintPreview.res
trunk/jvcl/packages/d6/JvPrintPreviewDesign.rc
trunk/jvcl/packages/d6/JvPrintPreviewDesign.res
trunk/jvcl/packages/d6/JvRuntimeDesign.rc
trunk/jvcl/packages/d6/JvRuntimeDesign.res
trunk/jvcl/packages/d6/JvRuntimeDesignDesign.rc
trunk/jvcl/packages/d6/JvRuntimeDesignDesign.res
trunk/jvcl/packages/d6/JvStdCtrls.rc
trunk/jvcl/packages/d6/JvStdCtrls.res
trunk/jvcl/packages/d6/JvStdCtrlsDesign.rc
trunk/jvcl/packages/d6/JvStdCtrlsDesign.res
trunk/jvcl/packages/d6/JvSystem.rc
trunk/jvcl/packages/d6/JvSystem.res
trunk/jvcl/packages/d6/JvSystemDesign.rc
trunk/jvcl/packages/d6/JvSystemDesign.res
trunk/jvcl/packages/d6/JvTimeFramework.rc
trunk/jvcl/packages/d6/JvTimeFramework.res
trunk/jvcl/packages/d6/JvTimeFrameworkDesign.rc
trunk/jvcl/packages/d6/JvTimeFrameworkDesign.res
trunk/jvcl/packages/d6/JvWizards.rc
trunk/jvcl/packages/d6/JvWizards.res
trunk/jvcl/packages/d6/JvWizardsDesign.rc
trunk/jvcl/packages/d6/JvWizardsDesign.res
trunk/jvcl/packages/d6/JvXPCtrls.rc
trunk/jvcl/packages/d6/JvXPCtrls.res
trunk/jvcl/packages/d6/JvXPCtrlsDesign.rc
trunk/jvcl/packages/d6/JvXPCtrlsDesign.res
trunk/jvcl/packages/d6per/JvCore.rc
trunk/jvcl/packages/d6per/JvCore.res
trunk/jvcl/packages/d6per/JvDotNetCtrls.rc
trunk/jvcl/packages/d6per/JvDotNetCtrls.res
trunk/jvcl/packages/d6per/JvGlobus.rc
trunk/jvcl/packages/d6per/JvGlobus.res
trunk/jvcl/packages/d6per/JvGlobusDesign.rc
trunk/jvcl/packages/d6per/JvGlobusDesign.res
trunk/jvcl/packages/d6per/JvPascalInterpreter.rc
trunk/jvcl/packages/d6per/JvPascalInterpreter.res
trunk/jvcl/packages/d6per/JvPascalInterpreterDesign.rc
trunk/jvcl/packages/d6per/JvPascalInterpreterDesign.res
trunk/jvcl/packages/d6per/JvRuntimeDesign.rc
trunk/jvcl/packages/d6per/JvRuntimeDesign.res
trunk/jvcl/packages/d7/JvAppFrm.rc
trunk/jvcl/packages/d7/JvAppFrm.res
trunk/jvcl/packages/d7/JvAppFrmDesign.rc
trunk/jvcl/packages/d7/JvAppFrmDesign.res
trunk/jvcl/packages/d7/JvBDE.rc
trunk/jvcl/packages/d7/JvBDE.res
trunk/jvcl/packages/d7/JvBDEDesign.rc
trunk/jvcl/packages/d7/JvBDEDesign.res
trunk/jvcl/packages/d7/JvBands.rc
trunk/jvcl/packages/d7/JvBands.res
trunk/jvcl/packages/d7/JvBandsDesign.rc
trunk/jvcl/packages/d7/JvBandsDesign.res
trunk/jvcl/packages/d7/JvCmp.rc
trunk/jvcl/packages/d7/JvCmp.res
trunk/jvcl/packages/d7/JvCmpDesign.rc
trunk/jvcl/packages/d7/JvCmpDesign.res
trunk/jvcl/packages/d7/JvControls.rc
trunk/jvcl/packages/d7/JvControls.res
trunk/jvcl/packages/d7/JvControlsDesign.rc
trunk/jvcl/packages/d7/JvControlsDesign.res
trunk/jvcl/packages/d7/JvCore.rc
trunk/jvcl/packages/d7/JvCore.res
trunk/jvcl/packages/d7/JvCoreDesign.rc
trunk/jvcl/packages/d7/JvCoreDesign.res
trunk/jvcl/packages/d7/JvCrypt.rc
trunk/jvcl/packages/d7/JvCrypt.res
trunk/jvcl/packages/d7/JvCryptDesign.rc
trunk/jvcl/packages/d7/JvCryptDesign.res
trunk/jvcl/packages/d7/JvCustom.rc
trunk/jvcl/packages/d7/JvCustom.res
trunk/jvcl/packages/d7/JvCustomDesign.rc
trunk/jvcl/packages/d7/JvCustomDesign.res
trunk/jvcl/packages/d7/JvDB.rc
trunk/jvcl/packages/d7/JvDB.res
trunk/jvcl/packages/d7/JvDBDesign.rc
trunk/jvcl/packages/d7/JvDBDesign.res
trunk/jvcl/packages/d7/JvDlgs.rc
trunk/jvcl/packages/d7/JvDlgs.res
trunk/jvcl/packages/d7/JvDlgsDesign.rc
trunk/jvcl/pac...
[truncated message content] |
|
From: <ah...@us...> - 2012-08-11 20:27:26
|
Revision: 13389
http://jvcl.svn.sourceforge.net/jvcl/?rev=13389&view=rev
Author: ahuser
Date: 2012-08-11 20:27:20 +0000 (Sat, 11 Aug 2012)
Log Message:
-----------
Mantis #5955: JvJVCLUtils: MessageBox function overrides standard one from Windows unit
* Removed JvJVCLUtis.MessageBox function use JvMessageBox instead
Modified Paths:
--------------
trunk/jvcl/run/JvBDECheckPasswordForm.pas
trunk/jvcl/run/JvJVCLUtils.pas
trunk/jvcl/run/JvMenus.pas
Modified: trunk/jvcl/run/JvBDECheckPasswordForm.pas
===================================================================
--- trunk/jvcl/run/JvBDECheckPasswordForm.pas 2012-07-25 21:03:51 UTC (rev 13388)
+++ trunk/jvcl/run/JvBDECheckPasswordForm.pas 2012-08-11 20:27:20 UTC (rev 13389)
@@ -190,12 +190,12 @@
Ok := OnChangePassword(Table, OldPswd.Text, NewPswd.Text);
end;
if Ok then
- MessageBox(RsPasswordChanged, '', MB_OK or MB_ICONINFORMATION)
+ JvMessageBox(RsPasswordChanged, MB_OK or MB_ICONINFORMATION)
else
if Error = peMismatch then
- MessageBox(RsPasswordsMismatch, '', MB_OK or MB_ICONERROR)
+ JvMessageBox(RsPasswordsMismatch, MB_OK or MB_ICONERROR)
else
- MessageBox(RsPasswordNotChanged, '', MB_OK or MB_ICONERROR);
+ JvMessageBox(RsPasswordNotChanged, MB_OK or MB_ICONERROR);
finally
if Table <> nil then
Table.Free;
Modified: trunk/jvcl/run/JvJVCLUtils.pas
===================================================================
--- trunk/jvcl/run/JvJVCLUtils.pas 2012-07-25 21:03:51 UTC (rev 13388)
+++ trunk/jvcl/run/JvJVCLUtils.pas 2012-08-11 20:27:20 UTC (rev 13389)
@@ -271,9 +271,6 @@
function AppMinimized: Boolean;
function IsForegroundTask: Boolean;
-{ MessageBox is Application.MessageBox with string (not PChar) parameters.
- if Caption parameter = '', it replaced with Application.Title }
-function MessageBox(const Msg, Caption: string; const Flags: Integer): Integer;
function MsgBox(const Caption, Text: string; Flags: Integer): Integer; overload;
function MsgBox(Handle: THandle; const Caption, Text: string; Flags: Integer): Integer; overload;
function MsgDlg(const Msg: string; AType: TMsgDlgType; AButtons: TMsgDlgButtons; HelpCtx: Longint): Word;
@@ -2924,14 +2921,6 @@
end;
{$ENDIF UNIX}
-function MessageBox(const Msg, Caption: string; const Flags: Integer): Integer;
-begin
- if Caption <> '' then
- Result := Application.MessageBox(PChar(Msg), PChar(Caption), Flags)
- else
- Result := Application.MessageBox(PChar(Msg), PChar(Application.Title), Flags);
-end;
-
const
NoHelp = 0; { for MsgDlg2 }
MsgDlgCharSet: Integer = DEFAULT_CHARSET;
Modified: trunk/jvcl/run/JvMenus.pas
===================================================================
--- trunk/jvcl/run/JvMenus.pas 2012-07-25 21:03:51 UTC (rev 13388)
+++ trunk/jvcl/run/JvMenus.pas 2012-08-11 20:27:20 UTC (rev 13389)
@@ -2570,7 +2570,7 @@
end
else
begin
- MessageBox('!!! asked to draw nil item !!!'#13#10 +
+ JvMessageBox('!!! asked to draw nil item !!!'#13#10 +
'Please report this to the JVCL team, ' +
'detailing the precise conditions in ' +
'which this error occured.'#13#10 +
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
|
|
From: <jfu...@us...> - 2012-07-25 21:03:57
|
Revision: 13388
http://jvcl.svn.sourceforge.net/jvcl/?rev=13388&view=rev
Author: jfudickar
Date: 2012-07-25 21:03:51 +0000 (Wed, 25 Jul 2012)
Log Message:
-----------
The shortcut is shown again in the connection info.
Modified Paths:
--------------
trunk/jvcl/run/JvBaseDBLogonDialog.pas
trunk/jvcl/run/JvDBLogonDialogUniDac.pas
Modified: trunk/jvcl/run/JvBaseDBLogonDialog.pas
===================================================================
--- trunk/jvcl/run/JvBaseDBLogonDialog.pas 2012-07-25 20:55:00 UTC (rev 13387)
+++ trunk/jvcl/run/JvBaseDBLogonDialog.pas 2012-07-25 21:03:51 UTC (rev 13388)
@@ -2227,6 +2227,8 @@
else
if DatabaseEnabled and (Database <> '') then
Result := Result + '@' + TranslateDatabaseName(Database);
+ if ShortCutText <> '' then
+ Result := Result + ' ('+ShortCutText+')';
end;
function TJvBaseConnectionInfo.DatabaseGroupIdentifier: string;
Modified: trunk/jvcl/run/JvDBLogonDialogUniDac.pas
===================================================================
--- trunk/jvcl/run/JvDBLogonDialogUniDac.pas 2012-07-25 20:55:00 UTC (rev 13387)
+++ trunk/jvcl/run/JvDBLogonDialogUniDac.pas 2012-07-25 21:03:51 UTC (rev 13388)
@@ -673,7 +673,9 @@
if not(AliasEnabled and (Alias <> '')) and
DatabaseEnabled and (Database <> '') then
Result := Result + ' - ' + Database;
- Result := Result + ' ('+Provider+')';
+ Result := Result + ' {'+Provider+'}';
+ if ShortCutText <> '' then
+ Result := Result + ' ('+ShortCutText+')';
end;
function TJvUniDacConnectionInfo.DatabaseGroupIdentifier: string;
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
|
|
From: <jfu...@us...> - 2012-07-25 20:55:08
|
Revision: 13387
http://jvcl.svn.sourceforge.net/jvcl/?rev=13387&view=rev
Author: jfudickar
Date: 2012-07-25 20:55:00 +0000 (Wed, 25 Jul 2012)
Log Message:
-----------
- Fixed AV when closing an application using the DBLogonDialog
- Improved Handling of the last session reload
Modified Paths:
--------------
trunk/jvcl/run/JvBaseDBLogonDialog.pas
trunk/jvcl/run/JvDBLogonDialogUniDac.pas
Modified: trunk/jvcl/run/JvBaseDBLogonDialog.pas
===================================================================
--- trunk/jvcl/run/JvBaseDBLogonDialog.pas 2012-07-19 21:49:04 UTC (rev 13386)
+++ trunk/jvcl/run/JvBaseDBLogonDialog.pas 2012-07-25 20:55:00 UTC (rev 13387)
@@ -25,6 +25,7 @@
unit JvBaseDBLogonDialog;
{$I jvcl.inc}
+{$DEFINE CODESITE}
interface
@@ -205,19 +206,17 @@
AdditionalBtn: TWinControl;
AdditionalPopupMenu: TPopupMenu;
AddToListBtn: TWinControl;
- AliasEdit: TWinControl;
AliasPanel: TWinControl;
ButtonPanel: TWinControl;
CancelBtn: TWinControl;
ColorBoxPanel: TWinControl;
- ColorComboBox: TWinControl;
ConnectBtn: TWinControl;
- ConnectGroupComboBox: TWinControl;
ConnectGroupPanel: TWinControl;
ConnectListListBox: TWinControl;
DatabaseComboBox: TWinControl;
DatabasePanel: TWinControl;
DatabaseTreeView: TWinControl;
+ EditConnectionPanel: TWinControl;
FAfterTransferSessionDataToConnectionInfo: TJvLogonDialogConnectionInfoEvent;
FBeforeTransferConnectionInfoToSessionData: TJvLogonDialogConnectionInfoEvent;
FConnectionList: TJvBaseConnectionList;
@@ -237,6 +236,7 @@
IAliasEditData: IJvDynControlData;
IColorComboBox: IJvDynControlColorComboBoxControl;
IConnectGroupComboBoxData: IJvDynControlData;
+ IConnectGroupComboBoxItems: IJvDynControlItems;
IConnectionListPageControlTab: IJvDynControlTabControl;
IConnectListListBoxData: IJvDynControlData;
IConnectListListBoxItems: IJvDynControlItems;
@@ -252,12 +252,10 @@
IUserTreeView: IJvDynControlTreeView;
LeftBottomPanel: TWinControl;
LeftPanel: TWinControl;
- EditConnectionPanel: TWinControl;
PasswordEdit: TWinControl;
PasswordPanel: TWinControl;
RemoveFromListBtn: TWinControl;
SavePasswordsCheckBox: TWinControl;
- ShortCutComboBox: TWinControl;
ShortCutPanel: TWinControl;
UserNameEdit: TWinControl;
UserNamePanel: TWinControl;
@@ -555,31 +553,37 @@
procedure TJvBaseDBLogonDialog.ClearControlInterfaceObjects;
begin
- IConnectGroupComboBoxData := nil;
- IConnectionListPageControlTab := nil;
- IConnectListListBoxData := nil;
- IConnectListListBoxItems := nil;
- IColorComboBox := nil;
- IDatabaseComboBoxData := nil;
- IDatabaseTreeView := nil;
- IGroupByDatabaseCheckBox := nil;
- IGroupByUserCheckBox := nil;
- IGroupTreeView := nil;
- IPasswordEditData := nil;
- ISavePasswordsCheckBox := nil;
- IShortCutComboBoxData := nil;
- IUserNameEditData := nil;
- IUserTreeView := nil;
+ IAliasEditData:= nil;
+ IColorComboBox:= nil;
+ IConnectGroupComboBoxData:= nil;
+ IConnectGroupComboBoxItems:= nil;
+ IConnectionListPageControlTab:= nil;
+ IConnectListListBoxData:= nil;
+ IConnectListListBoxItems:= nil;
+ IDatabaseComboBoxData:= nil;
+ IDatabaseTreeView:= nil;
+ IGroupByDatabaseCheckBox:= nil;
+ IGroupByUserCheckBox:= nil;
+ IGroupTreeView:= nil;
+ IPasswordEditData:= nil;
+ ISavePasswordsCheckBox:= nil;
+ IShortCutComboBoxData:= nil;
+ IUserNameEditData:= nil;
+ IUserTreeView:= nil;
end;
procedure TJvBaseDBLogonDialog.ClearFormControls;
begin
- IUserNameEditData.ControlValue := '';
- IPasswordEditData.ControlValue := '';
- IDatabaseComboBoxData.ControlValue := '';
+ if Assigned(IUserNameEditData) then
+ IUserNameEditData.ControlValue := '';
+ if Assigned(IPasswordEditData) then
+ IPasswordEditData.ControlValue := '';
+ if Assigned(IDatabaseComboBoxData) then
+ IDatabaseComboBoxData.ControlValue := '';
if Assigned(IConnectGroupComboBoxData) then
IConnectGroupComboBoxData.ControlValue := '';
- IShortCutComboBoxData.ControlValue := '';
+ if Assigned(IShortCutComboBoxData) then
+ IShortCutComboBoxData.ControlValue := '';
if Assigned(IColorComboBox) then
IColorComboBox.ControlSelectedColor := cDefaultColorComboBoxColor;
end;
@@ -659,7 +663,11 @@
procedure TJvBaseDBLogonDialog.CreateFormControls(AForm: TForm);
var
MainPanel, ListPanel, ListBtnPanel, GroupListPanel: TWinControl;
+ AliasEdit: TWinControl;
+ ShortCutComboBox: TWinControl;
+ ConnectGroupComboBox: TWinControl;
ConnectionListPageControl: TWinControl;
+ ColorComboBox: TWinControl;
Items: TStringList;
ITabControl: IJvDynControlTabControl;
IDynControl: IJvDynControl;
@@ -680,7 +688,7 @@
AForm.BorderStyle := bsDialog;
AForm.Caption := RsLogonToDatabase;
AForm.ClientHeight := 440;
- AForm.ClientWidth := 590;
+ AForm.ClientWidth := 680;
AForm.Position := poScreenCenter;
AForm.KeyPreview := True;
AForm.OnClose := FormClose;
@@ -860,7 +868,7 @@
SavePasswordsCheckBox.Visible := Options.ShowSavePasswords;
LeftPanel := DynControlEngine.CreatePanelControl(AForm, MainPanel, 'LeftPanel', '', alLeft);
- LeftPanel.Width := 240;
+ LeftPanel.Width := 280;
if Supports(LeftPanel, IJvDynControlBevelBorder, IDynControlBevelBorder) then
IDynControlBevelBorder.ControlSetBevelOuter(bvNone);
LeftPanel.TabOrder := 0;
@@ -892,7 +900,6 @@
CreateAdditionalConnectDialogControls(AForm, EditConnectionPanel);
-
CreateAdditionalConnectDialogEditPanel(AForm, LeftBottomPanel, 'ShortCut', RsShortCut, jctComboBox, ShortCutPanel, ShortCutComboBox, IShortCutComboBoxData, DefaultOnEditChange);
if Supports(ShortCutComboBox, IJvDynControlComboBox, IDynControlComboBox) then
IDynControlComboBox.ControlSetNewEntriesAllowed(False);
@@ -913,6 +920,7 @@
IDynControl.ControlSetOnClick(DefaultOnEditChange);
IDynControl.ControlSetOnExit(DefaultOnEditChange); // Fix for the VCL/JVCL Controls which did not react on OnChange and OnClick
end;
+ Supports(ConnectGroupComboBox, IJvDynControlItems, IConnectGroupComboBoxItems);
ColorBoxPanel := DynControlEngine.CreatePanelControl(AForm, LeftBottomPanel, 'ColorBoxPanel', '', alTop);
AlignControlTop(ColorBoxPanel, ConnectGroupPanel);
@@ -934,6 +942,7 @@
IDynControlAutoSize.ControlSetAutoSize(True);
ColorBoxPanel.Visible := Options.ShowColors;
SetPanelHeight(ColorBoxPanel);
+
end;
function TJvBaseDBLogonDialog.CreatePasswordChangeDialog: TJvBaseDBPasswordDialog;
@@ -993,6 +1002,8 @@
procedure TJvBaseDBLogonDialog.DefaultOnEditChange(Sender: TObject);
begin
+ if csDestroying in ComponentState then
+ Exit;
TransferConnectionInfoFromDialog(CurrentConnectionInfo);
ValidateConnectBtnEnabled;
end;
@@ -1058,10 +1069,8 @@
i: Integer;
Connection: TJvBaseConnectionInfo;
Items: TStringList;
- IDynControlItems: IJvDynControlItems;
begin
- if Assigned(ConnectGroupComboBox) and
- Supports(ConnectGroupComboBox, IJvDynControlItems, IDynControlItems) then
+ if Assigned(IConnectGroupComboBoxItems) then
begin
Items := TStringList.Create;
try
@@ -1073,7 +1082,7 @@
if Items.IndexOf(Connection.Group) < 0 then
Items.Add(Connection.Group);
end;
- IDynControlItems.ControlItems.Assign(Items);
+ IConnectGroupComboBoxItems.ControlItems.Assign(Items);
finally
Items.Free;
end;
@@ -1314,7 +1323,9 @@
if DBDialog.ModalResult = mrOk then
begin
if Options.SaveLastConnect then
- TransferConnectionInfoFromDialog(ConnectionList.LastConnect);
+ TransferConnectionInfoFromDialog(ConnectionList.LastConnect)
+ else
+ ConnectionList.LastConnect.Clear;
StoreSettings;
end;
ClearControlInterfaceObjects;
@@ -1349,9 +1360,14 @@
ClearFormControls;
FillAllConnectionLists;
TransferSessionDataToDialog;
- if Options.SaveLastConnect and
- ((DialogUserName = '') or (ConnectionList.LastConnect.SearchName = CurrentConnectionInfo.SearchName)) then
- TransferConnectionInfoToDialog(ConnectionList.LastConnect);
+ if Options.SaveLastConnect then
+ begin
+ if (ConnectionList.LastConnect.SearchName = CurrentConnectionInfo.SearchName) then
+ ConnectionList.LastConnect.Password := CurrentConnectionInfo.Password;
+ if ((DialogUserName = '') or
+ (ConnectionList.LastConnect.SearchName = CurrentConnectionInfo.SearchName)) then
+ TransferConnectionInfoToDialog(ConnectionList.LastConnect);
+ end;
ValidateConnectBtnEnabled;
end;
@@ -1818,9 +1834,12 @@
procedure TJvBaseDBLogonDialog.SetEditPanelsTabOrder;
begin
- UsernamePanel.TabOrder := 0;
- PasswordPanel.TabOrder := 1;
- DataBasePanel.TabOrder := 2;
+ if Assigned(UsernamePanel) then
+ UsernamePanel.TabOrder := 0;
+ if Assigned(PasswordPanel) then
+ PasswordPanel.TabOrder := 1;
+ if Assigned(DataBasePanel) then
+ DataBasePanel.TabOrder := 2;
end;
procedure TJvBaseDBLogonDialog.SetEditPanelsVisibility;
@@ -1915,20 +1934,20 @@
begin
if ConnectionInfo.UsernameEnabled then
if Options.UsernameCaseSensitive then
- ConnectionInfo.Username := IUserNameEditData.ControlValue
+ ConnectionInfo.Username := DialogUserName
else
- ConnectionInfo.Username := UpperCase(IUserNameEditData.ControlValue)
+ ConnectionInfo.Username := UpperCase(DialogUserName)
else
ConnectionInfo.Username := '';
if ConnectionInfo.PasswordEnabled then
- ConnectionInfo.Password := EncryptPassword(IPasswordEditData.ControlValue)
+ ConnectionInfo.Password := EncryptPassword(DialogPassword)
else
ConnectionInfo.Password := '';
if ConnectionInfo.DatabaseEnabled then
if Options.DatabasenameCaseSensitive then
- ConnectionInfo.Database := IDatabaseComboBoxData.ControlValue
+ ConnectionInfo.Database := DialogDatabase
else
- ConnectionInfo.Database := UpperCase(IDatabaseComboBoxData.ControlValue)
+ ConnectionInfo.Database := UpperCase(DialogDatabase)
else
ConnectionInfo.Database := '';
if Options.ShowAlias and Assigned(IAliasEditData) and ConnectionInfo.AliasEnabled then
@@ -1937,7 +1956,7 @@
ConnectionInfo.Group := IConnectGroupComboBoxData.ControlValue;
if Options.ShowColors and Assigned(IColorComboBox) then
ConnectionInfo.Color := IColorComboBox.ControlSelectedColor;
- if Options.ShowShortcuts then
+ if Options.ShowShortcuts and Assigned(IShortCutComboBoxData) then
ConnectionInfo.ShortCutText := IShortCutComboBoxData.ControlValue;
end;
end;
@@ -1958,13 +1977,13 @@
IShortCutComboBoxData.ControlValue := ConnectionInfo.ShortCutText;
if Options.ShowColors and Assigned(IColorComboBox) then
IColorComboBox.ControlSelectedColor := ConnectionInfo.Color;
- if (ConnectionInfo.Username = '') and UserNameEdit.CanFocus then
+ if (ConnectionInfo.Username = '') and Assigned(UserNameEdit) and UserNameEdit.CanFocus then
UserNameEdit.SetFocus
else
- if (ConnectionInfo.Password = '') and PasswordEdit.CanFocus then
+ if (ConnectionInfo.Password = '') and Assigned(PasswordEdit) and PasswordEdit.CanFocus then
PasswordEdit.SetFocus
else
- if (ConnectionInfo.Database = '') and DatabaseComboBox.CanFocus then
+ if (ConnectionInfo.Database = '') and Assigned(DatabaseComboBox) and DatabaseComboBox.CanFocus then
DatabaseComboBox.SetFocus;
end;
end;
@@ -2068,7 +2087,8 @@
procedure TJvBaseDBOracleLogonDialog.ClearFormControls;
begin
inherited ClearFormControls;
- IConnectAsComboBoxData.ControlValue := 'NORMAL';
+ if Assigned(IConnectAsComboBoxData) then
+ IConnectAsComboBoxData.ControlValue := 'NORMAL';
end;
procedure TJvBaseDBOracleLogonDialog.CreateAdditionalConnectDialogControls(AOwner: TComponent; AParentControl:
@@ -2138,7 +2158,8 @@
procedure TJvBaseDBOracleLogonDialog.SetEditPanelsTabOrder;
begin
inherited SetEditPanelsTabOrder;
- ConnectAsPanel.TabOrder := 3;
+ if Assigned(ConnectAsPanel) then
+ ConnectAsPanel.TabOrder := 3;
end;
procedure TJvBaseDBOracleLogonDialog.SetEditPanelsVisibility;
Modified: trunk/jvcl/run/JvDBLogonDialogUniDac.pas
===================================================================
--- trunk/jvcl/run/JvDBLogonDialogUniDac.pas 2012-07-19 21:49:04 UTC (rev 13386)
+++ trunk/jvcl/run/JvDBLogonDialogUniDac.pas 2012-07-25 20:55:00 UTC (rev 13387)
@@ -124,47 +124,47 @@
{$ENDIF RTL230_UP}
TJvDBUniDacLogonDialog = class(TJvBaseDBOracleLogonDialog)
private
+ DirectCheckBox: TWinControl;
+ FInternalConnectDialog: TUniConnectDialog;
FInternalConnection: TUniConnection;
- FInternalConnectDialog: TUniConnectDialog;
FOnFillServerList: TJvUniDacLogonDialogFillListEvent;
FUniConnection: TUniConnection;
+ IDirectCheckBox: IJvDynControlCheckBox;
IOracleHomeEditData: IJvDynControlData;
IOracleHomeEditItems: IJvDynControlItems;
+ IPortEditData: IJvDynControlData;
+ IProviderEditData: IJvDynControlData;
+ IProviderEditItems: IJvDynControlItems;
+ IServerEditData: IJvDynControlData;
+ IServerEditItems: IJvDynControlItems;
OracleHomeEdit: TWinControl;
OracleHomePanel: TWinControl;
- IServerEditData: IJvDynControlData;
- IServerEditItems: IJvDynControlItems;
- ServerEdit: TWinControl;
- ServerPanel: TWinControl;
- IPortEditData: IJvDynControlData;
PortEdit: TWinControl;
PortPanel: TWinControl;
- IProviderEditData: IJvDynControlData;
- IProviderEditItems: IJvDynControlItems;
ProviderEdit: TWinControl;
ProviderPanel: TWinControl;
- DirectCheckBox: TWinControl;
- IDirectCheckBox: IJvDynControlCheckBox;
+ ServerEdit: TWinControl;
+ ServerPanel: TWinControl;
function GetConnectionList: TJvUniDacConnectionList;
function GetCurrentConnectionInfo: TJvUniDacConnectionInfo;
function GetOptions: TJvDBUniDacLogonDialogOptions;
function GetUniConnection: TUniConnection;
procedure SetOptions(const Value: TJvDBUniDacLogonDialogOptions);
+ property InternalConnectDialog: TUniConnectDialog read FInternalConnectDialog;
property InternalConnection: TUniConnection read FInternalConnection;
- property InternalConnectDialog: TUniConnectDialog read FInternalConnectDialog;
protected
procedure CreateAdditionalConnectDialogControls(AOwner: TComponent; AParentControl: TWinControl); override;
procedure CreateFormControls(AForm: TForm); override;
procedure FillAllComoboBoxes; override;
procedure FillDatabaseComboBoxValues(Items: TStrings); override;
+ procedure FillServerComboBox;
procedure FillServerComboBoxValues(Items: TStrings); virtual;
- procedure FillServerComboBox;
- procedure ProviderOnEditChange(Sender: TObject);
{ Retrieve the class that holds the storage options and format settings. }
class function GetDBLogonConnectionListClass: TJvBaseConnectionListClass; override;
{ Retrieve the class that holds the storage options and format settings. }
class function GetDBLogonDialogOptionsClass: TJvBaseDBLogonDialogOptionsClass; override;
procedure HandleExpiredPassword(const ErrorMessage: string);
+ procedure ProviderOnEditChange(Sender: TObject);
procedure SetEditPanelsTabOrder; override;
procedure SetEditPanelsVisibility; override;
procedure SetSession(const Value: TComponent); override;
@@ -182,8 +182,8 @@
function SessionIsConnected: Boolean; override;
property CurrentConnectionInfo: TJvUniDacConnectionInfo read GetCurrentConnectionInfo;
published
+ property Options: TJvDBUniDacLogonDialogOptions read GetOptions write SetOptions;
property OnFillServerList: TJvUniDacLogonDialogFillListEvent read FOnFillServerList write FOnFillServerList;
- property Options: TJvDBUniDacLogonDialogOptions read GetOptions write SetOptions;
end;
TJvDBUniDacConnectDialog = class(TJvDBBaseDevartConnectDialog)
@@ -263,12 +263,14 @@
procedure TJvDBUniDacLogonDialog.ClearControlInterfaceObjects;
begin
inherited ClearControlInterfaceObjects;
- IOracleHomeEditData:= nil;
- IProviderEditData:= nil;
- IProviderEditItems:= nil;
- IServerEditData:= nil;
- IServerEditItems:= nil;
- IPortEditData:= nil;
+ IDirectCheckBox := nil;
+ IOracleHomeEditData := nil;
+ IOracleHomeEditItems := nil;
+ IPortEditData := nil;
+ IProviderEditData := nil;
+ IProviderEditItems := nil;
+ IServerEditData := nil;
+ IServerEditItems := nil;
end;
procedure TJvDBUniDacLogonDialog.ConnectSession;
@@ -367,21 +369,6 @@
end;
end;
-procedure TJvDBUniDacLogonDialog.FillServerComboBoxValues(Items: TStrings);
-var i : Integer;
- Connection: TJvUniDacConnectionInfo;
-begin
- if Options.AddConnectionValuesToComboBox then
- for i := 0 to ConnectionList.Count - 1 do
- begin
- Connection := ConnectionList.Connection[i];
- if Connection.Provider = CurrentConnectionInfo.Provider then
- if Connection.Server <> '' then
- if Items.IndexOf(Connection.Server) < 0 then
- Items.Add(Connection.Server);
- end;
-end;
-
procedure TJvDBUniDacLogonDialog.FillServerComboBox;
var
List: TStringList;
@@ -392,14 +379,14 @@
Items.Sorted := True;
InternalConnection.ProviderName := CurrentConnectionInfo.Provider;
if TUniUtils.CanGetProvider(InternalConnection) then begin
- List := TStringList.Create;
- try
- InternalConnectDialog.GetServerList(List);
- Items.AddStrings(List);
- finally
- List.Free;
- end;
- end;
+ List := TStringList.Create;
+ try
+ InternalConnectDialog.GetServerList(List);
+ Items.AddStrings(List);
+ finally
+ List.Free;
+ end;
+ end;
FillServerComboBoxValues(Items);
if Assigned(FOnFillServerList) then
FOnFillServerList(CurrentConnectionInfo.Provider, Items);
@@ -409,6 +396,21 @@
end;
end;
+procedure TJvDBUniDacLogonDialog.FillServerComboBoxValues(Items: TStrings);
+var i : Integer;
+ Connection: TJvUniDacConnectionInfo;
+begin
+ if Options.AddConnectionValuesToComboBox then
+ for i := 0 to ConnectionList.Count - 1 do
+ begin
+ Connection := ConnectionList.Connection[i];
+ if Connection.Provider = CurrentConnectionInfo.Provider then
+ if Connection.Server <> '' then
+ if Items.IndexOf(Connection.Server) < 0 then
+ Items.Add(Connection.Server);
+ end;
+end;
+
function TJvDBUniDacLogonDialog.GetConnectionList: TJvUniDacConnectionList;
begin
Result := TJvUniDacConnectionList(Inherited ConnectionList);
@@ -419,14 +421,6 @@
Result := TJvUniDacConnectionInfo(inherited CurrentConnectionInfo);
end;
-procedure TJvDBUniDacLogonDialog.ProviderOnEditChange(Sender: TObject);
-begin
- TransferConnectionInfoFromDialog(CurrentConnectionInfo);
- RearrangeEditPanel;
- FillAllComoboBoxes;
- ValidateConnectBtnEnabled;
-end;
-
class function TJvDBUniDacLogonDialog.GetDBLogonConnectionListClass: TJvBaseConnectionListClass;
begin
Result := TJvUniDacConnectionList;
@@ -456,6 +450,14 @@
UniConnection.PerformConnect;
end;
+procedure TJvDBUniDacLogonDialog.ProviderOnEditChange(Sender: TObject);
+begin
+ TransferConnectionInfoFromDialog(CurrentConnectionInfo);
+ RearrangeEditPanel;
+ FillAllComoboBoxes;
+ ValidateConnectBtnEnabled;
+end;
+
function TJvDBUniDacLogonDialog.SessionIsConnected: Boolean;
begin
Result := UniConnection.Connected;
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
|
|
From: <jfu...@us...> - 2012-07-19 21:49:10
|
Revision: 13386
http://jvcl.svn.sourceforge.net/jvcl/?rev=13386&view=rev
Author: jfudickar
Date: 2012-07-19 21:49:04 +0000 (Thu, 19 Jul 2012)
Log Message:
-----------
Improved Examples
Modified Paths:
--------------
trunk/jvcl/examples/JvDBOdacComponents/JvDBOdacComponentsMainForm.dfm
trunk/jvcl/examples/JvDBOdacComponents/JvDBOdacComponentsMainForm.pas
trunk/jvcl/examples/JvProgramVersionCheck/Main.dfm
trunk/jvcl/examples/JvProgramVersionCheck/Main.pas
trunk/jvcl/examples/JvThread/fThread.dfm
trunk/jvcl/examples/JvThread/fThread.pas
Modified: trunk/jvcl/examples/JvDBOdacComponents/JvDBOdacComponentsMainForm.dfm
===================================================================
--- trunk/jvcl/examples/JvDBOdacComponents/JvDBOdacComponentsMainForm.dfm 2012-07-19 21:47:00 UTC (rev 13385)
+++ trunk/jvcl/examples/JvDBOdacComponents/JvDBOdacComponentsMainForm.dfm 2012-07-19 21:49:04 UTC (rev 13386)
@@ -214,7 +214,6 @@
Lines.Strings = (
'Select * from user_objects')
TabOrder = 3
- ExplicitHeight = 250
end
object OraSession1: TOraSession
DataTypeMap = <>
Modified: trunk/jvcl/examples/JvDBOdacComponents/JvDBOdacComponentsMainForm.pas
===================================================================
--- trunk/jvcl/examples/JvDBOdacComponents/JvDBOdacComponentsMainForm.pas 2012-07-19 21:47:00 UTC (rev 13385)
+++ trunk/jvcl/examples/JvDBOdacComponents/JvDBOdacComponentsMainForm.pas 2012-07-19 21:49:04 UTC (rev 13386)
@@ -1,5 +1,7 @@
unit JvDBOdacComponentsMainForm;
+{$I jvcl.inc}
+
interface
uses
@@ -9,7 +11,12 @@
JvDBPasswordDialogOdac, MemDS, OraSmart, JvOdacSmartQuery, JvDBActions,
ActnList, JvActionsEngine, Buttons, JvDBLogonDialogBaseDevart,
JvDBActionsEngineDatasetDevart,
- JvDynControlEngineJVCL, JvComponentBase, JvAppStorage, JvAppRegistryStorage;
+ {$IFDEF USE_3RDPARTY_DEVEXPRESS_CXEDITOR}
+ JvDynControlEngineDevExpCx,
+ {$ELSE}
+ JvDynControlEngineJVCL,
+ {$ENDIF}
+ JvComponentBase, JvAppStorage, JvAppRegistryStorage;
type
TForm1 = class(TForm)
Modified: trunk/jvcl/examples/JvProgramVersionCheck/Main.dfm
===================================================================
--- trunk/jvcl/examples/JvProgramVersionCheck/Main.dfm 2012-07-19 21:47:00 UTC (rev 13385)
+++ trunk/jvcl/examples/JvProgramVersionCheck/Main.dfm 2012-07-19 21:49:04 UTC (rev 13386)
@@ -2,8 +2,8 @@
Left = 357
Top = 242
Caption = 'Form1'
- ClientHeight = 379
- ClientWidth = 468
+ ClientHeight = 502
+ ClientWidth = 558
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Modified: trunk/jvcl/examples/JvProgramVersionCheck/Main.pas
===================================================================
--- trunk/jvcl/examples/JvProgramVersionCheck/Main.pas 2012-07-19 21:47:00 UTC (rev 13385)
+++ trunk/jvcl/examples/JvProgramVersionCheck/Main.pas 2012-07-19 21:49:04 UTC (rev 13386)
@@ -2,6 +2,8 @@
interface
+{$I jvcl.inc}
+
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, JvProgramVersionCheck, JvComponent, JvAppStorage, JvAppIniStorage,
@@ -24,7 +26,7 @@
procedure Button2Click(Sender: TObject);
procedure FormShow(Sender: TObject);
public
- procedure VersionCheck;
+ procedure VersionCheck;
end;
var
@@ -35,7 +37,11 @@
{$R *.dfm}
Uses JclFileUtils, JvTypes, JvPropertyStoreEditor,
- JvDynControlEngineJVCLInspector, JvDynControlEngineJVCL;
+ JvDynControlEngineJVCLInspector, JvDynControlEngineJVCL
+ {$IFDEF USE_3RDPARTY_DEVEXPRESS_CXEDITOR}
+ , JvDynControlEngineDevExpCx
+ {$ENDIF}
+ ;
procedure TForm1.Button1Click(Sender: TObject);
begin
@@ -57,12 +63,13 @@
procedure TForm1.VersionCheck;
begin
- with ProgramVersionCheck do
- begin
- Execute ;
- end;
+ ProgramVersionCheck.Execute ;
end;
begin
+ {$IFDEF USE_3RDPARTY_DEVEXPRESS_CXEDITOR}
+ RegisterJvDynControlRTTIInspectorControl(DynControlEngineDevExpCx);
+ {$ELSE}
RegisterJvDynControlRTTIInspectorControl(DynControlEngineJVCL);
+ {$ENDIF}
end.
Modified: trunk/jvcl/examples/JvThread/fThread.dfm
===================================================================
--- trunk/jvcl/examples/JvThread/fThread.dfm 2012-07-19 21:47:00 UTC (rev 13385)
+++ trunk/jvcl/examples/JvThread/fThread.dfm 2012-07-19 21:49:04 UTC (rev 13386)
@@ -4,7 +4,7 @@
BorderIcons = [biSystemMenu, biMinimize]
BorderStyle = bsSingle
Caption = 'JvThread Demo'
- ClientHeight = 143
+ ClientHeight = 201
ClientWidth = 364
Color = clBtnFace
DefaultMonitor = dmDesktop
@@ -65,7 +65,7 @@
object Button3: TButton
Left = 121
Top = 18
- Width = 100
+ Width = 145
Height = 25
Caption = 'Start Job 1 &Dialog'
TabOrder = 2
@@ -74,12 +74,21 @@
object Button4: TButton
Left = 121
Top = 69
- Width = 100
+ Width = 145
Height = 25
- Caption = 'Start Job 2 D&ialog'
+ Caption = 'Start Job 2 D&ialog Animated'
TabOrder = 3
OnClick = Button4Click
end
+ object Button5: TButton
+ Left = 121
+ Top = 138
+ Width = 145
+ Height = 25
+ Caption = 'Start Job 3 &Sizing Dialog'
+ TabOrder = 4
+ OnClick = Button3Click
+ end
object JvThread1: TJvThread
Exclusive = True
MaxCount = 0
@@ -118,7 +127,7 @@
DialogOptions.CancelButtonCaption = 'Cancel'
DialogOptions.Caption = 'Execute Thread'
DialogOptions.InfoText = 'Infotext'#13#10'<yx<yx'#13#10'<y'#13#10'x'
- DialogOptions.CommonAVI = aviCopyFiles
+ DialogOptions.CommonAVI = aviFindFile
Left = 260
Top = 80
end
Modified: trunk/jvcl/examples/JvThread/fThread.pas
===================================================================
--- trunk/jvcl/examples/JvThread/fThread.pas 2012-07-19 21:47:00 UTC (rev 13385)
+++ trunk/jvcl/examples/JvThread/fThread.pas 2012-07-19 21:49:04 UTC (rev 13386)
@@ -48,6 +48,7 @@
JvThreadAnimateDialog1: TJvThreadAnimateDialog;
Button3: TButton;
Button4: TButton;
+ Button5: TButton;
procedure JvThread1Execute(Sender: TObject; params: Pointer);
procedure Button1Click(Sender: TObject);
procedure JvThread2Execute(Sender: TObject; params: Pointer);
@@ -55,7 +56,11 @@
procedure FormDestroy(Sender: TObject);
procedure Button4Click(Sender: TObject);
procedure Button3Click(Sender: TObject);
+ procedure ThreadDialogChangeThreadDialogOptions(DialogOptions: TJvThreadBaseDialogOptions);
private
+ ThreadInfoProgressBarPosition: Integer;
+ ThreadInfoText: string;
+ procedure OnThreadExecute(Sender: TObject; Params: Pointer);
public
Value: Integer;
Value2: Integer;
@@ -80,7 +85,7 @@
//Do the job here
k := 0;
for i := 0 to 100 do
- for j := 0 to 500 do
+ for j := 0 to 800 do
begin
Inc(k);
@@ -160,10 +165,62 @@
end;
procedure TForm1.Button3Click(Sender: TObject);
+var
+ Thread: TJvThread;
+ ThreadDialog: TJvThreadSimpleDialog;
begin
- JvThread1.ThreadDialog := JvThreadSimpleDialog1;
- JvThread1.Execute(Self);
- //(Sender as TButton).Enabled := False;
+ Thread := TJvThread.Create(Self);
+ ThreadDialog := TJvThreadSimpleDialog.Create(Self);
+ try
+ Thread.Name := 'Thread';
+ Thread.Exclusive := True;
+ Thread.MaxCount := 0;
+ Thread.RunOnCreate := True;
+ Thread.FreeOnTerminate := True;
+ Thread.ThreadDialog := ThreadDialog;
+ Thread.OnExecute := OnThreadExecute;
+ ThreadDialog.Name := 'ThreadDialog';
+ ThreadDialog.ChangeThreadDialogOptions := ThreadDialogChangeThreadDialogOptions;
+ ThreadDialog.DialogOptions.Caption := 'Sizing Thread Sample';
+ ThreadDialog.DialogOptions.ShowCancelButton := False;
+ ThreadDialog.DialogOptions.ShowDialog := True;
+ ThreadDialog.DialogOptions.ShowModal := True;
+ ThreadDialog.DialogOptions.ShowProgressBar := True;
+ Thread.ExecuteWithDialog(nil);
+ finally
+ Thread.Free;
+ ThreadDialog.Free;
+ end;
+
end;
+procedure TForm1.ThreadDialogChangeThreadDialogOptions(DialogOptions: TJvThreadBaseDialogOptions);
+begin
+ DialogOptions.InfoText := ThreadInfoText;
+ if DialogOptions is TJvThreadSimpleDialogOptions then
+ TJvThreadSimpleDialogOptions(DialogOptions).ProgressbarPosition := ThreadInfoProgressBarPosition;
+end;
+
+procedure TForm1.OnThreadExecute(Sender: TObject; Params: Pointer);
+var
+ i: Integer;
+begin
+// (TBaseSQLUtility(Params));
+ for i := 0 to 20 do
+ begin
+ ThreadInfoProgressBarPosition := i;
+ case i mod 5 of
+ 1 : ThreadInfoText := 'Das ist ein Test';
+ 2 : ThreadInfoText := 'ist ein Test';
+ 3 : ThreadInfoText := 'Das ist ein sehr sehr sehr langer Test der nicht zu umbr\xFCchen f\xFChrt';
+ 4 : ThreadInfoText := 'Das ist ein langer Test der nicht zu umbr\xFCchen f\xFChrt';
+ 5 : ThreadInfoText := 'Das ist ein langer Test der zu umbr\xFCchen f\xFChrt';
+ else
+ ThreadInfoText := 'Das ist ein anderer Test der auch zu lang wird und daher nicht passt';
+ end;
+ Sleep(1000);
+ end;
+
+end;
+
end.
\ No newline at end of file
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
|
|
From: <jfu...@us...> - 2012-07-19 21:47:06
|
Revision: 13385
http://jvcl.svn.sourceforge.net/jvcl/?rev=13385&view=rev
Author: jfudickar
Date: 2012-07-19 21:47:00 +0000 (Thu, 19 Jul 2012)
Log Message:
-----------
Devart UniDac Integration
Modified Paths:
--------------
trunk/jvcl/design/JvDBReg.pas
Modified: trunk/jvcl/design/JvDBReg.pas
===================================================================
--- trunk/jvcl/design/JvDBReg.pas 2012-07-19 21:46:49 UTC (rev 13384)
+++ trunk/jvcl/design/JvDBReg.pas 2012-07-19 21:47:00 UTC (rev 13385)
@@ -45,11 +45,15 @@
JvDBPasswordDialogDoa,
JvDBLogonDialogDoa,
{$ENDIF USE_3RDPARTY_DOA}
- {$IFDEF USE_3RDPARTY_CORELAB_ODAC}
+ {$IFDEF USE_3RDPARTY_DEVART_ODAC}
JvDBPasswordDialogOdac,
JvDBLogonDialogOdac,
JvOdacSmartQuery,
- {$ENDIF USE_3RDPARTY_CORELAB_ODAC}
+ {$ENDIF USE_3RDPARTY_DEVART_ODAC}
+ {$IFDEF USE_3RDPARTY_DEVART_UNIDAC}
+ JvDBLogonDialogUniDac,
+ JvUniDacQuery,
+ {$ENDIF USE_3RDPARTY_DEVART_UNIDAC}
JvADOQuery,
JvMemoryDataset, JvDBDatePickerEdit, JvDBDateTimePicker, JvDBLookupTreeView,
JvDBProgressBar, JvDBRichEdit, JvDBSpinEdit, JvDBTreeView, JvDBLookup,
@@ -58,7 +62,9 @@
JvDBSearchComboBox, JvAppDBStorage, JvDBFindEdit, JvDBImage, JvDBEditors,
JvDBMemDatasetEditor, JvDBGridExportEditors, JvDBGridEditors, JvCsvDataEditor,
JvDBActionsEngine, JvDBActions, JvDBCheckBox,
- JvDBActnResForm, JvDataSource, JvDataSourceIntf;
+ JvDBActnResForm, JvDataSource, JvDataSourceIntf,
+ JvDynControlEngineVCL // This prevents runtime error messages about not initialized JvDynControlEngine
+ ;
{$R JvDBReg.dcr}
@@ -85,10 +91,14 @@
{$IFDEF USE_3RDPARTY_DOA}
TJvOracleDataset, TJvDBDoaLogonDialog, TJvDBDoaPasswordDialog,
{$ENDIF USE_3RDPARTY_DOA}
- {$IFDEF USE_3RDPARTY_CORELAB_ODAC}
+ {$IFDEF USE_3RDPARTY_DEVART_ODAC}
TJvDBOdacConnectDialog, TJvDBOdacPasswordDialog, TjvOdacSmartQuery,
TjvOdacOraTable, TjvOdacOraQuery,
- {$ENDIF USE_3RDPARTY_CORELAB_ODAC}
+ {$ENDIF USE_3RDPARTY_DEVART_ODAC}
+ {$IFDEF USE_3RDPARTY_DEVART_UNIDAC}
+ TJvDBUniDacConnectDialog,
+ TjvUniDacUniTable, TjvUniDacUniQuery,
+ {$ENDIF USE_3RDPARTY_DEVART_UNIDAC}
TJvADOQuery, TJvADODataSet,
TJvDBGridWordExport, TJvDBGridExcelExport, TJvDBGridHTMLExport,
TJvDBGridCSVExport, TJvDBGridXMLExport, TJvDatabaseActionList]);
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
|
6 messages has been excluded from this view by a project administrator.