|
From: <car...@us...> - 2017-04-04 15:28:37
|
Revision: 982
http://sourceforge.net/p/instantobjects/code/982
Author: carlobar
Date: 2017-04-04 15:28:27 +0000 (Tue, 04 Apr 2017)
Log Message:
-----------
Added supporto for Delphi 10.2 Tokyo
Updated demos
Modified Paths:
--------------
trunk/Source/Brokers/XML/D10_1/IOXML.dproj
Added Paths:
-----------
trunk/Demos/Intro/DemoData.pas
trunk/Demos/Intro/Intro_Icon.ico
trunk/Demos/Intro/RandomData.pas
trunk/Demos/PrimerCross/Primer_D10.mdr
trunk/Demos/PrimerCross/Primer_D10.tst
trunk/Demos/PrimerCross/Primer_D10_2.dpr
trunk/Demos/PrimerCross/Primer_D10_2.dproj
trunk/Demos/PrimerCross/Primer_D10_2.mdr
trunk/Demos/PrimerCross/Primer_D10_2.res
trunk/Demos/PrimerCross/Primer_D10_2.xml
trunk/Demos/PrimerFireMonkey/Pictures/
trunk/Demos/PrimerFireMonkey/Pictures/man01.bmp
trunk/Demos/PrimerFireMonkey/Pictures/man01.emf
trunk/Demos/PrimerFireMonkey/Pictures/man01.jpg
trunk/Demos/PrimerFireMonkey/Pictures/man01.png
trunk/Demos/PrimerFireMonkey/Pictures/man02.bmp
trunk/Demos/PrimerFireMonkey/Pictures/man02.emf
trunk/Demos/PrimerFireMonkey/Pictures/man02.jpg
trunk/Demos/PrimerFireMonkey/Pictures/man02.png
trunk/Demos/PrimerFireMonkey/Pictures/man03.bmp
trunk/Demos/PrimerFireMonkey/Pictures/man03.emf
trunk/Demos/PrimerFireMonkey/Pictures/man03.jpg
trunk/Demos/PrimerFireMonkey/Pictures/man03.png
trunk/Demos/PrimerFireMonkey/Pictures/man04.bmp
trunk/Demos/PrimerFireMonkey/Pictures/man04.emf
trunk/Demos/PrimerFireMonkey/Pictures/man04.jpg
trunk/Demos/PrimerFireMonkey/Pictures/man04.png
trunk/Demos/PrimerFireMonkey/Pictures/man05.bmp
trunk/Demos/PrimerFireMonkey/Pictures/man05.emf
trunk/Demos/PrimerFireMonkey/Pictures/man05.jpg
trunk/Demos/PrimerFireMonkey/Pictures/man05.png
trunk/Demos/PrimerFireMonkey/Pictures/woman01.bmp
trunk/Demos/PrimerFireMonkey/Pictures/woman01.emf
trunk/Demos/PrimerFireMonkey/Pictures/woman01.jpg
trunk/Demos/PrimerFireMonkey/Pictures/woman01.png
trunk/Demos/PrimerFireMonkey/Pictures/woman02.bmp
trunk/Demos/PrimerFireMonkey/Pictures/woman02.emf
trunk/Demos/PrimerFireMonkey/Pictures/woman02.jpg
trunk/Demos/PrimerFireMonkey/Pictures/woman02.png
trunk/Demos/PrimerFireMonkey/Pictures/woman03.bmp
trunk/Demos/PrimerFireMonkey/Pictures/woman03.emf
trunk/Demos/PrimerFireMonkey/Pictures/woman03.jpg
trunk/Demos/PrimerFireMonkey/Pictures/woman03.png
trunk/Demos/PrimerFireMonkey/Pictures/woman04.bmp
trunk/Demos/PrimerFireMonkey/Pictures/woman04.emf
trunk/Demos/PrimerFireMonkey/Pictures/woman04.jpg
trunk/Demos/PrimerFireMonkey/Pictures/woman04.png
trunk/Demos/PrimerFireMonkey/Pictures/woman05.bmp
trunk/Demos/PrimerFireMonkey/Pictures/woman05.emf
trunk/Demos/PrimerFireMonkey/Pictures/woman05.jpg
trunk/Demos/PrimerFireMonkey/Pictures/woman05.png
trunk/Demos/PrimerFireMonkey/Projects/DXE3/PrimerFM.mdr
trunk/Demos/PrimerFireMonkey/Projects/DXE3/PrimerFM.res
trunk/Demos/PrimerFireMonkey/Projects/DXE5/PrimerFM.mdr
trunk/Demos/PrimerFireMonkey/Projects/DXE5/PrimerFM.res
trunk/Demos/PrimerFireMonkey/Projects/DXE7/PrimerFM.mdr
trunk/Demos/PrimerFireMonkey/Projects/DXE7/PrimerFM.res
trunk/Demos/PrimerFireMonkey/Source/
trunk/Demos/PrimerFireMonkey/Source/DemoData.pas
trunk/Demos/PrimerFireMonkey/Source/Main.fmx
trunk/Demos/PrimerFireMonkey/Source/Main.pas
trunk/Demos/PrimerFireMonkey/Source/Model.pas
trunk/Demos/PrimerFireMonkey/Source/RandomData.pas
trunk/SVN_PROPSET.BAT
trunk/Source/Brokers/ADO/D10_2/
trunk/Source/Brokers/ADO/D10_2/DclIOADO.dpk
trunk/Source/Brokers/ADO/D10_2/DclIOADO.dproj
trunk/Source/Brokers/ADO/D10_2/DclIOADO.res
trunk/Source/Brokers/ADO/D10_2/IOADO.dpk
trunk/Source/Brokers/ADO/D10_2/IOADO.dproj
trunk/Source/Brokers/ADO/D10_2/IOADO.res
trunk/Source/Brokers/DBX/D10_2/
trunk/Source/Brokers/DBX/D10_2/DclIODBX.dpk
trunk/Source/Brokers/DBX/D10_2/DclIODBX.dproj
trunk/Source/Brokers/DBX/D10_2/DclIODBX.res
trunk/Source/Brokers/DBX/D10_2/IODBX.dpk
trunk/Source/Brokers/DBX/D10_2/IODBX.dproj
trunk/Source/Brokers/DBX/D10_2/IODBX.res
trunk/Source/Brokers/FireDAC/D10_2/
trunk/Source/Brokers/FireDAC/D10_2/DclIOFireDAC.dpk
trunk/Source/Brokers/FireDAC/D10_2/DclIOFireDAC.dproj
trunk/Source/Brokers/FireDAC/D10_2/DclIOFireDAC.res
trunk/Source/Brokers/FireDAC/D10_2/IOFireDAC.dpk
trunk/Source/Brokers/FireDAC/D10_2/IOFireDAC.dproj
trunk/Source/Brokers/FireDAC/D10_2/IOFireDAC.res
trunk/Source/Brokers/IBX/D10_2/
trunk/Source/Brokers/IBX/D10_2/DclIOIBX.dpk
trunk/Source/Brokers/IBX/D10_2/DclIOIBX.dproj
trunk/Source/Brokers/IBX/D10_2/DclIOIBX.res
trunk/Source/Brokers/IBX/D10_2/IOIBX.dpk
trunk/Source/Brokers/IBX/D10_2/IOIBX.dproj
trunk/Source/Brokers/IBX/D10_2/IOIBX.res
trunk/Source/Brokers/XML/D10_2/
trunk/Source/Brokers/XML/D10_2/DclIOXML.dpk
trunk/Source/Brokers/XML/D10_2/DclIOXML.dproj
trunk/Source/Brokers/XML/D10_2/DclIOXML.res
trunk/Source/Brokers/XML/D10_2/IOXML.dpk
trunk/Source/Brokers/XML/D10_2/IOXML.dproj
trunk/Source/Brokers/XML/D10_2/IOXML.res
trunk/Source/Catalogs/IBFb/D10_2/
trunk/Source/Catalogs/IBFb/D10_2/IOIBFbCatalog.dpk
trunk/Source/Catalogs/IBFb/D10_2/IOIBFbCatalog.dproj
trunk/Source/Catalogs/IBFb/D10_2/IOIBFbCatalog.res
trunk/Source/Catalogs/MSSql/D10_2/
trunk/Source/Catalogs/MSSql/D10_2/IOMSSqlCatalog.dpk
trunk/Source/Catalogs/MSSql/D10_2/IOMSSqlCatalog.dproj
trunk/Source/Catalogs/MSSql/D10_2/IOMSSqlCatalog.res
trunk/Source/Catalogs/MySQL/D10_2/
trunk/Source/Catalogs/MySQL/D10_2/IOMySQLCatalog.dpk
trunk/Source/Catalogs/MySQL/D10_2/IOMySQLCatalog.dproj
trunk/Source/Catalogs/MySQL/D10_2/IOMySQLCatalog.res
trunk/Source/Core/D10_2/
trunk/Source/Core/D10_2/IOCore.dpk
trunk/Source/Core/D10_2/IOCore.dproj
trunk/Source/Core/D10_2/IOCore.res
trunk/Source/Core/InstantDataBrowser.pas
trunk/Source/Design/D10_2/
trunk/Source/Design/D10_2/DclIOCore.dpk
trunk/Source/Design/D10_2/DclIOCore.dproj
trunk/Source/Design/D10_2/DclIOCore.res
trunk/Source/PackageGroups/D10_2/
trunk/Source/PackageGroups/D10_2/DesignTimePackages.groupproj
trunk/Source/PackageGroups/D10_2/RunTimePackages.groupproj
trunk/Tests/DUnit/Projects/
trunk/Tests/DUnit/Projects/TestIO/
trunk/Tests/DUnit/Projects/TestIO/TestIO.dpr
trunk/Tests/DUnit/Projects/TestIO/TestIO.dproj
trunk/Tests/DUnit/Projects/TestIO/TestIO.res
trunk/Tests/DUnitX/
trunk/Tests/DUnitX/TestProject.dpr
trunk/Tests/DUnitX/TestProject.dproj
trunk/Tests/DUnitX/TestProject.res
trunk/Tests/DUnitX/TestUnit.pas
trunk/Tests/NotRefCountIObject.pas
trunk/Tests/TestIO_D10_1.dpr
trunk/Tests/TestIO_D10_1.dproj
trunk/Tests/TestIO_D10_1.mdrt
trunk/Tests/TestIO_D10_1.mdx
trunk/Tests/TestIO_D10_1.mdxt
trunk/Tests/TestIO_D10_2.dpr
trunk/Tests/TestIO_D10_2.dproj
trunk/Tests/TestIO_D10_2.mdr
trunk/Tests/TestIO_D10_2.mdrt
trunk/Tests/TestIO_D10_2.mdx
trunk/Tests/TestIO_D10_2.mdxt
trunk/Tests/TestIO_D10_2.res
trunk/Tests/ubMockObject.pas
Added: trunk/Demos/Intro/DemoData.pas
===================================================================
--- trunk/Demos/Intro/DemoData.pas (rev 0)
+++ trunk/Demos/Intro/DemoData.pas 2017-04-04 15:28:27 UTC (rev 982)
@@ -0,0 +1,93 @@
+unit DemoData;
+
+interface
+
+{$IFDEF LINUX}
+{$I '../../Source/InstantDefines.inc'}
+{$ELSE}
+{$I '..\..\Source\InstantDefines.inc'}
+{$ENDIF}
+
+uses
+ Classes, Model, InstantPersistence, RandomData;
+
+function CreateRandomCompany(ContactPerson: TPerson): TCompany;
+function CreateRandomPerson: TPerson;
+
+implementation
+
+uses
+ SysUtils,
+{$IFDEF MSWINDOWS}
+ Windows,
+{$ENDIF}
+{$IFDEF LINUX}
+ QDialogs,
+{$ENDIF}
+ InstantUtils;
+
+function CreateRandomAddress: TAddress;
+begin
+ Result := TAddress.Create;
+ try
+ Result.Street := RandomStreet;
+ Result.City := RandomCity;
+ Result.PostalCode := RandomNumber(6);
+ except
+ Result.Free;
+ raise;
+ end;
+end;
+
+procedure CreateRandomPhones(Contact: TContact; Names: array of string);
+var
+ I: Integer;
+ Phone: TPhone;
+begin
+ for I := Low(Names) to High(Names) do
+ if Random(3) > 0 then
+ begin
+ Phone := TPhone.Create;
+ try
+ Phone.Name := Names[I];
+ Phone.Number := RandomNumber(10);
+ Contact.AddPhone(Phone);
+ except
+ Phone.Free;
+ raise;
+ end;
+ end;
+end;
+
+function CreateRandomCompany(ContactPerson: TPerson): TCompany;
+begin
+ Result := TCompany.Create;
+ try
+ Result.Name := RandomCompanyName;
+ Result.Address := CreateRandomAddress;
+ CreateRandomPhones(Result, ['Business', 'Fax', 'Mobile']);
+ Result.ContactPerson := ContactPerson;
+ except
+ Result.Free;
+ raise;
+ end;
+end;
+
+function CreateRandomPerson: TPerson;
+var
+ Gender: TGender;
+begin
+ Result := TPerson.Create;
+ try
+ Gender := TGender(Random(2));
+ Result.Name := RandomFullName(Gender);
+ Result.DateOfBirth := Date - (20 * 365 + Random(365 * 50)); // 20 - 70 years old
+ Result.Address := CreateRandomAddress;
+ CreateRandomPhones(Result, ['Home', 'Mobile']);
+ except
+ Result.Free;
+ raise;
+ end;
+end;
+
+end.
Property changes on: trunk/Demos/Intro/DemoData.pas
___________________________________________________________________
Added: svn:eol-style
## -0,0 +1 ##
+native
\ No newline at end of property
Added: svn:mime-type
## -0,0 +1 ##
+text/plain
\ No newline at end of property
Added: trunk/Demos/Intro/Intro_Icon.ico
===================================================================
(Binary files differ)
Index: trunk/Demos/Intro/Intro_Icon.ico
===================================================================
--- trunk/Demos/Intro/Intro_Icon.ico 2017-04-04 14:40:13 UTC (rev 981)
+++ trunk/Demos/Intro/Intro_Icon.ico 2017-04-04 15:28:27 UTC (rev 982)
Property changes on: trunk/Demos/Intro/Intro_Icon.ico
___________________________________________________________________
Added: svn:mime-type
## -0,0 +1 ##
+application/octet-stream
\ No newline at end of property
Added: trunk/Demos/Intro/RandomData.pas
===================================================================
--- trunk/Demos/Intro/RandomData.pas (rev 0)
+++ trunk/Demos/Intro/RandomData.pas 2017-04-04 15:28:27 UTC (rev 982)
@@ -0,0 +1,242 @@
+unit RandomData;
+
+interface
+
+{$IFDEF LINUX}
+{$I '../../Source/InstantDefines.inc'}
+{$ELSE}
+{$I '..\..\Source\InstantDefines.inc'}
+{$ENDIF}
+
+type
+ TGender = (gnMale, gnFemale);
+
+function RandomName: string;
+function RandomCompanyName: string;
+function RandomEmail(const PersonName, DomainName: string): string;
+function RandomFirstName(Gender: TGender): string;
+function RandomFullName(Gender: TGender): string;
+function RandomLastName: string;
+function RandomNumber(Len: Integer): string;
+function RandomStreet: string;
+function RandomCity: string;
+
+implementation
+
+uses
+ SysUtils, InstantUtils;
+
+const
+ Letters = ['a'..'z'];
+ Vowels = ['a', 'e', 'i', 'o', 'u', 'y'];
+ Consonants = Letters - Vowels;
+
+ SmartPrefixes: array[0..19] of string = (
+ 'cor', 'pri', 'pre', 'neo', 'new', 'or', 'hi', 'inter',
+ 'u', 'i', 'core', 'xo', 'xe', 'xor', 'xer', 'qua', 'gen',
+ 'in', 're', 'tri');
+
+ SmartSuffixes: array[0..12] of string = (
+ 'teq', 'tex', 'tec', 'nix', 'lix', 'tor', 'max', 'time', 'qua',
+ 'paq', 'pac', 'nic', 'nec');
+
+ FirstNames: array[TGender, 0..24] of string = ((
+ 'Anthony', 'Brian', 'Charles', 'Christopher', 'Daniel', 'David', 'Donald',
+ 'Edward', 'George', 'James', 'Jason', 'Jeff', 'John', 'Joseph', 'Kenneth',
+ 'Kevin', 'Mark', 'Michael', 'Paul', 'Richard', 'Robert', 'Ronald', 'Steven',
+ 'Thomas', 'William'), (
+ 'Barbara', 'Betty', 'Carol', 'Deborah', 'Donna', 'Dorothy', 'Elizabeth',
+ 'Helen', 'Jennifer', 'Karen', 'Kimberly', 'Laura', 'Linda', 'Lisa',
+ 'Margaret', 'Maria', 'Mary', 'Michelle', 'Nancy', 'Patricia', 'Ruth',
+ 'Sandra', 'Sarah', 'Sharon', 'Susan'));
+
+ LastNames: array[0..49] of string = (
+ 'Adams', 'Allen', 'Anderson', 'Baker', 'Brown', 'Campbell', 'Carter',
+ 'Clark', 'Collins', 'Davis', 'Edwards', 'Evans', 'Garcia', 'Gonzalez',
+ 'Green', 'Hall', 'Harris', 'Hernandez', 'Hill', 'Jackson', 'Johnson',
+ 'Jones', 'King', 'Lee', 'Lewis', 'Lopez', 'Martin', 'Martinez', 'Miller',
+ 'Mitchell', 'Moore', 'Nelson', 'Parker', 'Perez', 'Phillips', 'Roberts',
+ 'Robinson', 'Rodriguez', 'Scott', 'Smith', 'Taylor', 'Thomas', 'Thompson',
+ 'Turner', 'Walker', 'White', 'Williams', 'Wilson', 'Wright', 'Young');
+
+ Adjectives: array[0..19] of string = (
+ 'Intelligent', 'Smart', 'Wise', 'Bright', 'Essential', 'Basic', 'Happy',
+ 'Precise', 'Fast', 'Express', 'Simple', 'Good', 'Deluxe', 'Perfect',
+ 'Star', 'Future', 'Millenium', 'Solid', 'Sure', 'Great');
+
+ CompanySuffixes: array[0..19] of string = (
+ 'Computers', 'Computing', 'Software', 'Technologies', 'Consulting', 'Food',
+ 'Furniture', 'Textiles', 'Wear', 'Toys', 'Adventures', 'Services', 'Tools',
+ 'Accessories', 'Entertainment', 'Flowers', 'Equipment', 'Items',
+ 'Architecture', 'Knowledge');
+
+ CompanyTypes: array[0..2] of string = (
+ 'Corp.', 'Inc.', 'Ltd.');
+
+ StreetPrefixes: array[0..3] of string = (
+ 'North', 'East', 'South', 'West');
+
+ StreetBeginnings: array[0..16] of string = (
+ 'Salt', 'Sun', 'Moon', 'Stone', 'Rock', 'Clear', 'White', 'Green',
+ 'Corn', 'Shore', 'Cotton', 'Oak', 'Water', 'Bright', 'New', 'Old',
+ 'Apple');
+
+ StreetEndings: array[0..6] of string = (
+ 'wood', 'dale', 'land', 'bridge', 'lake', 'hill', 'field');
+
+ StreetTypes: array[0..7] of string = (
+ 'Street', 'Road', 'Avenue', 'Place', 'Court', 'Boulevard', 'Drive',
+ 'Parkway');
+
+ Cities: array[0..29] of string = (
+ 'Alabama', 'Atlanta', 'Boston', 'Chicago', 'Cincinnati', 'Dallas', 'Denver',
+ 'Detroit', 'Houston', 'Indianapolis', 'Kansas City', 'Las Vegas',
+ 'Los Angeles', 'Memphis', 'Miami', 'Minneapolis', 'Nashville',
+ 'New Orleans', 'New York', 'Oklahoma', 'Omaha', 'Philadelphia',
+ 'Pittsburgh', 'Portland', 'San Diego', 'San Fransisco', 'Seattle', 'Tampa',
+ 'Utah', 'Washington');
+
+ DomainSuffixes: array[0..4] of string = (
+ 'com', 'org', 'net', 'edu', 'gov');
+
+function RandomStr(List: array of string): string;
+begin
+ Result := List[Random(Length(List))];
+end;
+
+function RandomLetter: Char;
+begin
+ Result := Chr(Ord('a') + Random(Ord('z') - Ord('a')));
+end;
+
+function RandomConsonant: Char;
+begin
+ repeat
+ Result := RandomLetter;
+ until InstantCharInSet(Result, Consonants);
+end;
+
+function RandomVowel: Char;
+begin
+ repeat
+ Result := RandomLetter;
+ until InstantCharInSet(Result, Vowels);
+end;
+
+function RandomName: string;
+
+ function SmartName: string;
+ begin
+ Result := RandomStr(SmartPrefixes) + RandomStr(SmartSuffixes);
+ end;
+
+ function CombiName: string;
+ begin
+ Result := RandomConsonant + RandomVowel;
+ if Odd(Random(2)) then
+ Result := Result + RandomConsonant;
+ Result := Result + RandomStr(SmartSuffixes);
+ end;
+
+ function TripletName: string;
+ var
+ I: Integer;
+ begin
+ Result := '';
+ for I := 1 to 3 do
+ begin
+ Result := Result + RandomConsonant + RandomVowel;
+ if Random(10) = 1 then
+ Result := Result + RandomConsonant;
+ end;
+ end;
+
+begin
+ case Random(3) of
+ 0: Result := SmartName;
+ 1: Result := CombiName;
+ 2: Result := TripletName;
+ end;
+ Result[1] := UpCase(Result[1]);
+end;
+
+function RandomCompanyName: string;
+begin
+ if Random(3) = 0 then
+ Result := RandomStr(Adjectives)
+ else
+ Result := RandomName;
+ Result := Result + ' ' + RandomStr(CompanySuffixes) + ' ' +
+ RandomStr(CompanyTypes);
+end;
+
+function RandomEmail(const PersonName, DomainName: string): string;
+var
+ Name, FirstName, LastName, Suffix: string;
+ I: Integer;
+begin
+ I := Pos(' ', PersonName);
+ if I > 0 then
+ begin
+ FirstName := Copy(PersonName, 1, Pred(I));
+ LastName := PersonName;
+ Delete(LastName, 1, I);
+ end else
+ begin
+ FirstName := PersonName;
+ LastName := '';
+ end;
+ case Random(3) of
+ 0: Name := FirstName + '.' + LastName;
+ 1: Name := Copy(FirstName, 1, 1) + Copy(LastName, 1, 1);
+ 2: Name := Copy(FirstName, 1, 1) + '_' + LastName;
+ end;
+ if Random(10) <> 0 then // 9 of 10 have .com
+ Suffix := DomainSuffixes[0] else
+ Suffix := RandomStr(DomainSuffixes);
+ Result := LowerCase(Name + '@' + DomainName + '.' + Suffix);
+end;
+
+function RandomFirstName(Gender: TGender): string;
+begin
+ Result := FirstNames[Gender, Random(Length(FirstNames[gnMale]))];
+end;
+
+function RandomFullName(Gender: TGender): string;
+begin
+ Result := RandomFirstName(Gender) + ' ' + RandomLastName;
+end;
+
+function RandomLastName: string;
+begin
+ Result := RandomStr(LastNames);
+end;
+
+function RandomNumber(Len: Integer): string;
+begin
+ Result := '';
+ while Len > 0 do
+ begin
+ Result := Result + Chr(Ord('0') + Random(10));
+ Dec(Len);
+ end;
+end;
+
+function RandomStreet: string;
+begin
+ if Random(8) = 0 then
+ Result := RandomStr(StreetPrefixes) + ' ' else
+ Result := '';
+ Result := Result +
+ RandomStr(StreetBeginnings) +
+ RandomStr(StreetEndings) + ' ' +
+ RandomStr(StreetTypes) + ' ' +
+ IntToStr((Random(499) + 1) div (Random(9) + 1) + 1);
+end;
+
+function RandomCity: string;
+begin
+ Result := RandomStr(Cities);
+end;
+
+end.
Property changes on: trunk/Demos/Intro/RandomData.pas
___________________________________________________________________
Added: svn:eol-style
## -0,0 +1 ##
+native
\ No newline at end of property
Added: svn:mime-type
## -0,0 +1 ##
+text/plain
\ No newline at end of property
Added: trunk/Demos/PrimerCross/Primer_D10.mdr
===================================================================
(Binary files differ)
Index: trunk/Demos/PrimerCross/Primer_D10.mdr
===================================================================
--- trunk/Demos/PrimerCross/Primer_D10.mdr 2017-04-04 14:40:13 UTC (rev 981)
+++ trunk/Demos/PrimerCross/Primer_D10.mdr 2017-04-04 15:28:27 UTC (rev 982)
Property changes on: trunk/Demos/PrimerCross/Primer_D10.mdr
___________________________________________________________________
Added: svn:mime-type
## -0,0 +1 ##
+application/octet-stream
\ No newline at end of property
Added: trunk/Demos/PrimerCross/Primer_D10.tst
===================================================================
(Binary files differ)
Index: trunk/Demos/PrimerCross/Primer_D10.tst
===================================================================
--- trunk/Demos/PrimerCross/Primer_D10.tst 2017-04-04 14:40:13 UTC (rev 981)
+++ trunk/Demos/PrimerCross/Primer_D10.tst 2017-04-04 15:28:27 UTC (rev 982)
Property changes on: trunk/Demos/PrimerCross/Primer_D10.tst
___________________________________________________________________
Added: svn:mime-type
## -0,0 +1 ##
+application/octet-stream
\ No newline at end of property
Added: trunk/Demos/PrimerCross/Primer_D10_2.dpr
===================================================================
--- trunk/Demos/PrimerCross/Primer_D10_2.dpr (rev 0)
+++ trunk/Demos/PrimerCross/Primer_D10_2.dpr 2017-04-04 15:28:27 UTC (rev 982)
@@ -0,0 +1,82 @@
+(*
+ * InstantObjects
+ * Primer Demo - with "internal storage" of Part and Parts
+ * Model.pas unit is located in Model folder
+ *
+ *)
+
+(* ***** BEGIN LICENSE BLOCK *****
+ * Version: MPL 1.1
+ *
+ * The contents of this file are subject to the Mozilla Public License Version
+ * 1.1 (the "License"); you may not use this file except in compliance with
+ * the License. You may obtain a copy of the License at
+ * http://www.mozilla.org/MPL/
+ *
+ * Software distributed under the License is distributed on an "AS IS" basis,
+ * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+ * for the specific language governing rights and limitations under the
+ * License.
+ *
+ * The Original Code is: Seleqt InstantObjects
+ *
+ * The Initial Developer of the Original Code is: Seleqt
+ *
+ * Portions created by the Initial Developer are Copyright (C) 2001-2003
+ * the Initial Developer. All Rights Reserved.
+ *
+ * Contributor(s):
+ * Carlo Barazzetta, Nando Dessena
+ *
+ * ***** END LICENSE BLOCK ***** *)
+
+program Primer_D10_2;
+
+{$IFDEF LINUX}
+{$I '../../Source/InstantDefines.inc'}
+{$ELSE}
+{$I '..\..\Source\InstantDefines.inc'}
+{$ENDIF}
+
+
+uses
+ Forms,
+ Main in 'Main.pas' {MainForm},
+ Model in 'Model\Model.pas',
+ ContactView in 'ContactView.pas' {ContactViewForm: TFrame},
+ BasicView in 'BasicView.pas' {BasicViewForm: TFrame},
+ BasicEdit in 'BasicEdit.pas' {BasicEditForm},
+ ContactEdit in 'ContactEdit.pas' {ContactEditForm},
+ PersonEdit in 'PersonEdit.pas' {PersonEditForm},
+ CompanyEdit in 'CompanyEdit.pas' {CompanyEditForm},
+ DemoData in 'DemoData.pas',
+ ContactFilterEdit in 'ContactFilterEdit.pas' {ContactFilterEditForm},
+ MainData in 'MainData.pas' {MainDataModule: TDataModule},
+ ContactBrowse in 'ContactBrowse.pas' {ContactBrowseForm},
+ CompanyBrowse in 'CompanyBrowse.pas' {CompanyBrowseForm},
+ PerformanceView in 'PerformanceView.pas' {PerformanceViewForm: TFrame},
+ Welcome in 'Welcome.pas' {WelcomeForm},
+ PersonBrowse in 'PersonBrowse.pas' {PersonBrowseForm},
+ BasicBrowse in 'BasicBrowse.pas' {BasicBrowseForm},
+ CountryBrowse in 'CountryBrowse.pas' {CountryBrowseForm},
+ DemoDataRequest in 'DemoDataRequest.pas' {DemoDataRequestForm},
+ ContactSort in 'ContactSort.pas' {ContactSortForm},
+ CategoryBrowse in 'CategoryBrowse.pas' {CategoryBrowseForm},
+ HelpView in 'HelpView.pas' {HelpViewForm: TFrame},
+ QueryView in 'QueryView.pas' {QueryViewForm: TFrame},
+ RandomData in 'RandomData.pas',
+ Stopwatch in 'Stopwatch.pas',
+ Utility in 'Utility.pas',
+ Vcl.Themes,
+ Vcl.Styles;
+
+{$R *.res}
+{$R *.mdr} {Model}
+
+begin
+ Application.Initialize;
+ Application.Title := 'InstantObjects Primer Demo (Delphi 10.2 Tokyo version)';
+ Application.CreateForm(TMainForm, MainForm);
+ Application.CreateForm(TMainDataModule, MainDataModule);
+ Application.Run;
+end.
Property changes on: trunk/Demos/PrimerCross/Primer_D10_2.dpr
___________________________________________________________________
Added: svn:eol-style
## -0,0 +1 ##
+native
\ No newline at end of property
Added: svn:mime-type
## -0,0 +1 ##
+text/plain
\ No newline at end of property
Added: trunk/Demos/PrimerCross/Primer_D10_2.dproj
===================================================================
--- trunk/Demos/PrimerCross/Primer_D10_2.dproj (rev 0)
+++ trunk/Demos/PrimerCross/Primer_D10_2.dproj 2017-04-04 15:28:27 UTC (rev 982)
@@ -0,0 +1,658 @@
+<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+ <PropertyGroup>
+ <ProjectGuid>{d197a2d4-31b9-43b1-8070-3f804d86e53f}</ProjectGuid>
+ <MainSource>Primer_D10_2.dpr</MainSource>
+ <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+ <DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+ <DCC_DependencyCheckOutputName>Primer.exe</DCC_DependencyCheckOutputName>
+ <ProjectVersion>18.2</ProjectVersion>
+ <Config Condition="'$(Config)'==''">Release</Config>
+ <Base>True</Base>
+ <AppType>Application</AppType>
+ <FrameworkType>VCL</FrameworkType>
+ <Platform Condition="'$(Platform)'==''">Win32</Platform>
+ <TargetedPlatforms>1</TargetedPlatforms>
+ </PropertyGroup>
+ <PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''">
+ <Base>true</Base>
+ </PropertyGroup>
+ <PropertyGroup Condition="('$(Platform)'=='iOSDevice32' and '$(Base)'=='true') or '$(Base_iOSDevice32)'!=''">
+ <Base_iOSDevice32>true</Base_iOSDevice32>
+ <CfgParent>Base</CfgParent>
+ <Base>true</Base>
+ </PropertyGroup>
+ <PropertyGroup Condition="('$(Platform)'=='iOSDevice64' and '$(Base)'=='true') or '$(Base_iOSDevice64)'!=''">
+ <Base_iOSDevice64>true</Base_iOSDevice64>
+ <CfgParent>Base</CfgParent>
+ <Base>true</Base>
+ </PropertyGroup>
+ <PropertyGroup Condition="('$(Platform)'=='Win32' and '$(Base)'=='true') or '$(Base_Win32)'!=''">
+ <Base_Win32>true</Base_Win32>
+ <CfgParent>Base</CfgParent>
+ <Base>true</Base>
+ </PropertyGroup>
+ <PropertyGroup Condition="('$(Platform)'=='Win64' and '$(Base)'=='true') or '$(Base_Win64)'!=''">
+ <Base_Win64>true</Base_Win64>
+ <CfgParent>Base</CfgParent>
+ <Base>true</Base>
+ </PropertyGroup>
+ <PropertyGroup Condition="'$(Config)'=='Release' or '$(Cfg_1)'!=''">
+ <Cfg_1>true</Cfg_1>
+ <CfgParent>Base</CfgParent>
+ <Base>true</Base>
+ </PropertyGroup>
+ <PropertyGroup Condition="('$(Platform)'=='Win32' and '$(Cfg_1)'=='true') or '$(Cfg_1_Win32)'!=''">
+ <Cfg_1_Win32>true</Cfg_1_Win32>
+ <CfgParent>Cfg_1</CfgParent>
+ <Cfg_1>true</Cfg_1>
+ <Base>true</Base>
+ </PropertyGroup>
+ <PropertyGroup Condition="'$(Config)'=='Debug' or '$(Cfg_2)'!=''">
+ <Cfg_2>true</Cfg_2>
+ <CfgParent>Base</CfgParent>
+ <Base>true</Base>
+ </PropertyGroup>
+ <PropertyGroup Condition="('$(Platform)'=='iOSDevice32' and '$(Cfg_2)'=='true') or '$(Cfg_2_iOSDevice32)'!=''">
+ <Cfg_2_iOSDevice32>true</Cfg_2_iOSDevice32>
+ <CfgParent>Cfg_2</CfgParent>
+ <Cfg_2>true</Cfg_2>
+ <Base>true</Base>
+ </PropertyGroup>
+ <PropertyGroup Condition="('$(Platform)'=='iOSDevice64' and '$(Cfg_2)'=='true') or '$(Cfg_2_iOSDevice64)'!=''">
+ <Cfg_2_iOSDevice64>true</Cfg_2_iOSDevice64>
+ <CfgParent>Cfg_2</CfgParent>
+ <Cfg_2>true</Cfg_2>
+ <Base>true</Base>
+ </PropertyGroup>
+ <PropertyGroup Condition="('$(Platform)'=='Win32' and '$(Cfg_2)'=='true') or '$(Cfg_2_Win32)'!=''">
+ <Cfg_2_Win32>true</Cfg_2_Win32>
+ <CfgParent>Cfg_2</CfgParent>
+ <Cfg_2>true</Cfg_2>
+ <Base>true</Base>
+ </PropertyGroup>
+ <PropertyGroup Condition="'$(Base)'!=''">
+ <Icon_MainIcon>Primer_D10_Icon.ico</Icon_MainIcon>
+ <SanitizedProjectName>Primer_D10_2</SanitizedProjectName>
+ <Manifest_File>$(BDS)\bin\default_app.manifest</Manifest_File>
+ <DCC_Namespace>Vcl;Vcl.Imaging;Vcl.Touch;Vcl.Samples;Vcl.Shell;System;Xml;Data;Datasnap;Web;Soap;Winapi;VCLTee;IBX;$(DCC_Namespace)</DCC_Namespace>
+ <VerInfo_IncludeVerInfo>true</VerInfo_IncludeVerInfo>
+ <VerInfo_MajorVer>2</VerInfo_MajorVer>
+ <VerInfo_Locale>1030</VerInfo_Locale>
+ <VerInfo_Keys>CompanyName=InstantObjects.org;FileDescription=Primer Demo;FileVersion=2.0.0.0;InternalName=;LegalCopyright=MPL public license;LegalTrademarks=;OriginalFilename=;ProductName=;ProductVersion=2.0;Comments=</VerInfo_Keys>
+ <DCC_UnitSearchPath>..\..\Source\Core;..\..\Source\Brokers\ADO;..\..\Source\Brokers\BDE;..\..\Source\Brokers\DBX;..\..\Source\Brokers\IBX;..\..\Source\Brokers\XML;..\..\Source\Brokers\FireDAC;..\..\Source\Catalogs\IBFb;..\..\Source\Catalogs\MSSql;..\..\Source\Catalogs\MySql;$(DCC_UnitSearchPath)</DCC_UnitSearchPath>
+ <DCC_UsePackage>vcl;rtl;vclx;dbrtl;vcldb;bdertl;vclimg;vclactnband;adortl;vcldbx;dbexpress;DbxCommonDriver;DataSnapIndy10ServerTransport;DataSnapProviderClient;vclie;xmlrtl;inet;dsnap;inetdb;IndySystem;IndyCore;IndyProtocols;DbxClientDriver;inetdbxpress;inetdbbde;DataSnapServer;dbxcds;DBXInterBaseDriver;DBXMySQLDriver;DBXFirebirdDriver;DBXSybaseASEDriver;DBXSybaseASADriver;DBXOracleDriver;DBXMSSQLDriver;DBXInformixDriver;DBXDb2Driver;vclib;ibxpress;intrawebdb_100_140;Intraweb_100_140;dsnapcon;vclribbon;VclSmp;soaprtl;TeeUI;TeeDB;Tee;vcltouch;webdsnap;websnap;rbRIDE1114;rbIDE1114;rbRAP1114;rbRCL1114;dclRBADO1114;rbADO1114;rbDB1114;rbDAD1114;dclRBBDE1114;rbDBDE1114;rbBDE1114;dclRBDBE1114;rbDBE1114;dclRBE1114;rbCIDE1114;dclRBIBE1114;rbIBE1114;rbUSERDesign1114;rbUSER1114;ActionBandExtensionsD2010;UniSynEdit_R2010;wPDF3_D2010;WPViewPDF_D2010;IOCore;Jcl;JclVcl;JvCoreD14R;JvSystemD14R;JvStdCtrlsD14R;JvAppFrmD14R;JvBandsD14R;JvDBD14R;JvDlgsD14R;JvBDED14R;JvCmpD14R;JvCryptD14R;JvCtrlsD14R;JvCustomD14R;JvDockingD14R;JvDotNetCtrlsD14R;JvEDID14R;JvGlobusD14R;JvHMID14R;JvInterpreterD14R;JvJansD14R;JvManagedThreadsD14R;JvMMD14R;JvNetD14R;JvPageCompsD14R;JvPluginD14R;JvPrintPreviewD14R;JvRuntimeDesignD14R;JvTimeFrameworkD14R;JvValidatorsD14R;JvWizardD14R;JvXPCtrlsD14R;rbDIDE1114;IOIBX;IOXML;IODBX;IOBDE;IOADO;ISRtl5;ISVcl5;ISOpenOffice5;ISFLib5;$(DCC_UsePackage)</DCC_UsePackage>
+ <DCC_DependencyCheckOutputName>Primer_DXE.exe</DCC_DependencyCheckOutputName>
+ </PropertyGroup>
+ <PropertyGroup Condition="'$(Base_iOSDevice32)'!=''">
+ <VerInfo_Keys>CFBundleName=$(MSBuildProjectName);CFBundleDevelopmentRegion=en;CFBundleDisplayName=$(MSBuildProjectName);CFBundleIdentifier=$(MSBuildProjectName);CFBundleInfoDictionaryVersion=7.1;CFBundleVersion=1.0.0.0;CFBundlePackageType=APPL;CFBundleSignature=????;LSRequiresIPhoneOS=true;CFBundleAllowMixedLocalizations=YES;CFBundleExecutable=$(MSBuildProjectName);UIDeviceFamily=iPhone & iPad;CFBundleResourceSpecification=ResourceRules.plist;NSLocationAlwaysUsageDescription=The reason for accessing the location information of the user;NSLocationWhenInUseUsageDescription=The reason for accessing the location information of the user;FMLocalNotificationPermission=false</VerInfo_Keys>
+ <VerInfo_UIDeviceFamily>iPhoneAndiPad</VerInfo_UIDeviceFamily>
+ <VerInfo_BundleId>$(MSBuildProjectName)</VerInfo_BundleId>
+ <BT_BuildType>Debug</BT_BuildType>
+ </PropertyGroup>
+ <PropertyGroup Condition="'$(Base_iOSDevice64)'!=''">
+ <VerInfo_Keys>CFBundleName=$(MSBuildProjectName);CFBundleDevelopmentRegion=en;CFBundleDisplayName=$(MSBuildProjectName);CFBundleIdentifier=$(MSBuildProjectName);CFBundleInfoDictionaryVersion=7.1;CFBundleVersion=1.0.0.0;CFBundlePackageType=APPL;CFBundleSignature=????;LSRequiresIPhoneOS=true;CFBundleAllowMixedLocalizations=YES;CFBundleExecutable=$(MSBuildProjectName);UIDeviceFamily=iPhone & iPad;CFBundleResourceSpecification=ResourceRules.plist;NSLocationAlwaysUsageDescription=The reason for accessing the location information of the user;NSLocationWhenInUseUsageDescription=The reason for accessing the location information of the user;FMLocalNotificationPermission=false</VerInfo_Keys>
+ <VerInfo_UIDeviceFamily>iPhoneAndiPad</VerInfo_UIDeviceFamily>
+ <VerInfo_BundleId>$(MSBuildProjectName)</VerInfo_BundleId>
+ <BT_BuildType>Debug</BT_BuildType>
+ </PropertyGroup>
+ <PropertyGroup Condition="'$(Base_Win32)'!=''">
+ <UWP_DelphiLogo44>$(BDS)\bin\Artwork\Windows\UWP\delphi_UwpDefault_44.png</UWP_DelphiLogo44>
+ <UWP_DelphiLogo150>$(BDS)\bin\Artwork\Windows\UWP\delphi_UwpDefault_150.png</UWP_DelphiLogo150>
+ <AppEnableRuntimeThemes>true</AppEnableRuntimeThemes>
+ <VerInfo_MajorVer>1</VerInfo_MajorVer>
+ <DCC_Namespace>System.Win;Data.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;Bde;$(DCC_Namespace)</DCC_Namespace>
+ <VerInfo_Locale>1033</VerInfo_Locale>
+ <VerInfo_Keys>CompanyName=;FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProductVersion=1.0.0.0;Comments=;ProgramID=com.embarcadero.$(ModuleName);FileDescription=$(ModuleName);ProductName=$(ModuleName)</VerInfo_Keys>
+ </PropertyGroup>
+ <PropertyGroup Condition="'$(Base_Win64)'!=''">
+ <UWP_DelphiLogo150>$(BDS)\bin\Artwork\Windows\UWP\delphi_UwpDefault_150.png</UWP_DelphiLogo150>
+ <UWP_DelphiLogo44>$(BDS)\bin\Artwork\Windows\UWP\delphi_UwpDefault_44.png</UWP_DelphiLogo44>
+ </PropertyGroup>
+ <PropertyGroup Condition="'$(Cfg_1)'!=''">
+ <Version>7.0</Version>
+ <DCC_DebugInformation>0</DCC_DebugInformation>
+ <DCC_LocalDebugSymbols>False</DCC_LocalDebugSymbols>
+ <DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
+ <DCC_Define>RELEASE;$(DCC_Define)</DCC_Define>
+ <DCC_ResourcePath>..\..\Source\Core;..\..\Source\Brokers\ADO;..\..\Source\Brokers\BDE;..\..\Source\Brokers\DBX;..\..\Source\Brokers\IBX;..\..\Source\Brokers\XML;..\..\Source\Catalogs\IBFb;..\..\Source\Catalogs\MSSql;..\..\Source\Catalogs\MySql;$(DCC_ResourcePath)</DCC_ResourcePath>
+ <DCC_ObjPath>..\..\Source\Core;..\..\Source\Brokers\ADO;..\..\Source\Brokers\BDE;..\..\Source\Brokers\DBX;..\..\Source\Brokers\IBX;..\..\Source\Brokers\XML;..\..\Source\Catalogs\IBFb;..\..\Source\Catalogs\MSSql;..\..\Source\Catalogs\MySql;$(DCC_ObjPath)</DCC_ObjPath>
+ <DCC_IncludePath>..\..\Source\Core;..\..\Source\Brokers\ADO;..\..\Source\Brokers\BDE;..\..\Source\Brokers\DBX;..\..\Source\Brokers\IBX;..\..\Source\Brokers\XML;..\..\Source\Catalogs\IBFb;..\..\Source\Catalogs\MSSql;..\..\Source\Catalogs\MySql;$(DCC_IncludePath)</DCC_IncludePath>
+ </PropertyGroup>
+ <PropertyGroup Condition="'$(Cfg_1_Win32)'!=''">
+ <BT_BuildType>Debug</BT_BuildType>
+ <AppEnableRuntimeThemes>true</AppEnableRuntimeThemes>
+ <VerInfo_Locale>1033</VerInfo_Locale>
+ <VerInfo_Keys>CompanyName=;FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProductVersion=1.0.0.0;Comments=;ProgramID=com.embarcadero.$(ModuleName);FileDescription=$(ModuleName);ProductName=$(ModuleName)</VerInfo_Keys>
+ <VerInfo_MajorVer>1</VerInfo_MajorVer>
+ </PropertyGroup>
+ <PropertyGroup Condition="'$(Cfg_2)'!=''">
+ <DCC_DebugDCUs>true</DCC_DebugDCUs>
+ <Version>7.0</Version>
+ <DCC_Define>DEBUG;IO_STATEMENT_LOGGING;$(DCC_Define)</DCC_Define>
+ <DCC_ResourcePath>..\..\Source\Core;..\..\Source\Brokers\ADO;..\..\Source\Brokers\BDE;..\..\Source\Brokers\DBX;..\..\Source\Brokers\IBX;..\..\Source\Brokers\XML;..\..\Source\Catalogs\IBFb;..\..\Source\Catalogs\MSSql;..\..\Source\Catalogs\MySql;$(DCC_ResourcePath)</DCC_ResourcePath>
+ <DCC_ObjPath>..\..\Source\Core;..\..\Source\Brokers\ADO;..\..\Source\Brokers\BDE;..\..\Source\Brokers\DBX;..\..\Source\Brokers\IBX;..\..\Source\Brokers\XML;..\..\Source\Catalogs\IBFb;..\..\Source\Catalogs\MSSql;..\..\Source\Catalogs\MySql;$(DCC_ObjPath)</DCC_ObjPath>
+ <DCC_IncludePath>..\..\Source\Core;..\..\Source\Brokers\ADO;..\..\Source\Brokers\BDE;..\..\Source\Brokers\DBX;..\..\Source\Brokers\IBX;..\..\Source\Brokers\XML;..\..\Source\Catalogs\IBFb;..\..\Source\Catalogs\MSSql;..\..\Source\Catalogs\MySql;$(DCC_IncludePath)</DCC_IncludePath>
+ </PropertyGroup>
+ <PropertyGroup Condition="'$(Cfg_2_iOSDevice32)'!=''">
+ <DCC_RemoteDebug>true</DCC_RemoteDebug>
+ </PropertyGroup>
+ <PropertyGroup Condition="'$(Cfg_2_iOSDevice64)'!=''">
+ <DCC_RemoteDebug>true</DCC_RemoteDebug>
+ </PropertyGroup>
+ <PropertyGroup Condition="'$(Cfg_2_Win32)'!=''">
+ <AppEnableRuntimeThemes>true</AppEnableRuntimeThemes>
+ <VerInfo_MajorVer>1</VerInfo_MajorVer>
+ <VerInfo_Keys>CompanyName=;FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProductVersion=1.0.0.0;Comments=;ProgramID=com.embarcadero.$(ModuleName);FileDescription=$(ModuleName);ProductName=$(ModuleName)</VerInfo_Keys>
+ <VerInfo_Locale>1033</VerInfo_Locale>
+ </PropertyGroup>
+ <ProjectExtensions>
+ <Borland.Personality>Delphi.Personality.12</Borland.Personality>
+ <Borland.ProjectType>VCLApplication</Borland.ProjectType>
+ <BorlandProject>
+ <Delphi.Personality>
+ <Parameters/>
+ <VersionInfo>
+ <VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+ <VersionInfo Name="AutoIncBuild">False</VersionInfo>
+ <VersionInfo Name="MajorVer">2</VersionInfo>
+ <VersionInfo Name="MinorVer">0</VersionInfo>
+ <VersionInfo Name="Release">0</VersionInfo>
+ <VersionInfo Name="Build">0</VersionInfo>
+ <VersionInfo Name="Debug">False</VersionInfo>
+ <VersionInfo Name="PreRelease">False</VersionInfo>
+ <VersionInfo Name="Special">False</VersionInfo>
+ <VersionInfo Name="Private">False</VersionInfo>
+ <VersionInfo Name="DLL">False</VersionInfo>
+ <VersionInfo Name="Locale">1030</VersionInfo>
+ <VersionInfo Name="CodePage">1252</VersionInfo>
+ </VersionInfo>
+ <VersionInfoKeys>
+ <VersionInfoKeys Name="CompanyName">InstantObjects.org</VersionInfoKeys>
+ <VersionInfoKeys Name="FileDescription">Primer Demo</VersionInfoKeys>
+ <VersionInfoKeys Name="FileVersion">2.0.0.0</VersionInfoKeys>
+ <VersionInfoKeys Name="InternalName"/>
+ <VersionInfoKeys Name="LegalCopyright">MPL public license</VersionInfoKeys>
+ <VersionInfoKeys Name="LegalTrademarks"/>
+ <VersionInfoKeys Name="OriginalFilename"/>
+ <VersionInfoKeys Name="ProductName"/>
+ <VersionInfoKeys Name="ProductVersion">2.0</VersionInfoKeys>
+ <VersionInfoKeys Name="Comments"/>
+ </VersionInfoKeys>
+ <Source>
+ <Source Name="MainSource">Primer_D10_2.dpr</Source>
+ </Source>
+ <Excluded_Packages>
+ <Excluded_Packages Name="$(BDSBIN)\dcloffice2k230.bpl">Microsoft Office 2000 Sample Automation Server Wrapper Components</Excluded_Packages>
+ <Excluded_Packages Name="$(BDSBIN)\dclofficexp230.bpl">Microsoft Office XP Sample Automation Server Wrapper Components</Excluded_Packages>
+ </Excluded_Packages>
+ </Delphi.Personality>
+ <ModelSupport>False</ModelSupport>
+ <Platforms>
+ <Platform value="iOSDevice32">False</Platform>
+ <Platform value="iOSDevice64">False</Platform>
+ <Platform value="Win32">True</Platform>
+ <Platform value="Win64">False</Platform>
+ </Platforms>
+ <Deployment Version="3">
+ <DeployFile LocalName="Primer_D10_2.exe" Configuration="Release" Class="ProjectOutput">
+ <Platform Name="Win32">
+ <RemoteName>Primer_D10_2.exe</RemoteName>
+ <Overwrite>true</Overwrite>
+ </Platform>
+ </DeployFile>
+ <DeployClass Name="AdditionalDebugSymbols">
+ <Platform Name="OSX32">
+ <Operation>1</Operation>
+ </Platform>
+ <Platform Name="Win32">
+ <RemoteDir>Contents\MacOS</RemoteDir>
+ <Operation>0</Operation>
+ </Platform>
+ </DeployClass>
+ <DeployClass Name="AndroidClassesDexFile">
+ <Platform Name="Android">
+ <RemoteDir>classes</RemoteDir>
+ <Operation>1</Operation>
+ </Platform>
+ </DeployClass>
+ <DeployClass Name="AndroidGDBServer">
+ <Platform Name="Android">
+ <RemoteDir>library\lib\armeabi-v7a</RemoteDir>
+ <Operation>1</Operation>
+ </Platform>
+ </DeployClass>
+ <DeployClass Name="AndroidLibnativeArmeabiFile">
+ <Platform Name="Android">
+ <RemoteDir>library\lib\armeabi</RemoteDir>
+ <Operation>1</Operation>
+ </Platform>
+ </DeployClass>
+ <DeployClass Name="AndroidLibnativeMipsFile">
+ <Platform Name="Android">
+ <RemoteDir>library\lib\mips</RemoteDir>
+ <Operation>1</Operation>
+ </Platform>
+ </DeployClass>
+ <DeployClass Name="AndroidLibnativeX86File"/>
+ <DeployClass Name="AndroidServiceOutput">
+ <Platform Name="Android">
+ <RemoteDir>library\lib\armeabi-v7a</RemoteDir>
+ <Operation>1</Operation>
+ </Platform>
+ </DeployClass>
+ <DeployClass Name="AndroidSplashImageDef">
+ <Platform Name="Android">
+ <RemoteDir>res\drawable</RemoteDir>
+ <Operation>1</Operation>
+ </Platform>
+ </DeployClass>
+ <DeployClass Name="AndroidSplashStyles">
+ <Platform Name="Android">
+ <RemoteDir>res\values</RemoteDir>
+ <Operation>1</Operation>
+ </Platform>
+ </DeployClass>
+ <DeployClass Name="Android_DefaultAppIcon">
+ <Platform Name="Android">
+ <RemoteDir>res\drawable</RemoteDir>
+ <Operation>1</Operation>
+ </Platform>
+ </DeployClass>
+ <DeployClass Name="Android_LauncherIcon144">
+ <Platform Name="Android">
+ <RemoteDir>res\drawable-xxhdpi</RemoteDir>
+ <Operation>1</Operation>
+ </Platform>
+ </DeployClass>
+ <DeployClass Name="Android_LauncherIcon36">
+ <Platform Name="Android">
+ <RemoteDir>res\drawable-ldpi</RemoteDir>
+ <Operation>1</Operation>
+ </Platform>
+ </DeployClass>
+ <DeployClass Name="Android_LauncherIcon48">
+ <Platform Name="Android">
+ <RemoteDir>res\drawable-mdpi</RemoteDir>
+ <Operation>1</Operation>
+ </Platform>
+ </DeployClass>
+ <DeployClass Name="Android_LauncherIcon72">
+ <Platform Name="Android">
+ <RemoteDir>res\drawable-hdpi</RemoteDir>
+ <Operation>1</Operation>
+ </Platform>
+ </DeployClass>
+ <DeployClass Name="Android_LauncherIcon96">
+ <Platform Name="Android">
+ <RemoteDir>res\drawable-xhdpi</RemoteDir>
+ <Operation>1</Operation>
+ </Platform>
+ </DeployClass>
+ <DeployClass Name="Android_SplashImage426">
+ <Platform Name="Android">
+ <RemoteDir>res\drawable-small</RemoteDir>
+ <Operation>1</Operation>
+ </Platform>
+ </DeployClass>
+ <DeployClass Name="Android_SplashImage470">
+ <Platform Name="Android">
+ <RemoteDir>res\drawable-normal</RemoteDir>
+ <Operation>1</Operation>
+ </Platform>
+ </DeployClass>
+ <DeployClass Name="Android_SplashImage640">
+ <Platform Name="Android">
+ <RemoteDir>res\drawable-large</RemoteDir>
+ <Operation>1</Operation>
+ </Platform>
+ </DeployClass>
+ <DeployClass Name="Android_SplashImage960">
+ <Platform Name="Android">
+ <RemoteDir>res\drawable-xlarge</RemoteDir>
+ <Operation>1</Operation>
+ </Platform>
+ </DeployClass>
+ <DeployClass Name="DebugSymbols">
+ <Platform Name="iOSSimulator">
+ <Operation>1</Operation>
+ </Platform>
+ <Platform Name="OSX32">
+ <Operation>1</Operation>
+ </Platform>
+ <Platform Name="Win32">
+ <Operation>0</Operation>
+ </Platform>
+ </DeployClass>
+ <DeployClass Name="DependencyFramework">
+ <Platform Name="OSX32">
+ <Operation>1</Operation>
+ <Extensions>.framework</Extensions>
+ </Platform>
+ <Platform Name="Win32">
+ <Operation>0</Operation>
+ </Platform>
+ </DeployClass>
+ <DeployClass Name="DependencyModule">
+ <Platform Name="OSX32">
+ <Operation>1</Operation>
+ <Extensions>.dylib</Extensions>
+ </Platform>
+ <Platform Name="Win32">
+ <Operation>0</Operation>
+ <Extensions>.dll;.bpl</Extensions>
+ </Platform>
+ </DeployClass>
+ <DeployClass Required="true" Name="DependencyPackage">
+ <Platform Name="iOSDevice32">
+ <Operation>1</Operation>
+ <Extensions>.dylib</Extensions>
+ </Platform>
+ <Platform Name="iOSDevice64">
+ <Operation>1</Operation>
+ <Extensions>.dylib</Extensions>
+ </Platform>
+ <Platform Name="iOSSimulator">
+ <Operation>1</Operation>
+ <Extensions>.dylib</Extensions>
+ </Platform>
+ <Platform Name="OSX32">
+ <Operation>1</Operation>
+ <Extensions>.dylib</Extensions>
+ </Platform>
+ <Platform Name="Win32">
+ <Operation>0</Operation>
+ <Extensions>.bpl</Extensions>
+ </Platform>
+ </DeployClass>
+ <DeployClass Name="File">
+ <Platform Name="Android">
+ <Operation>0</Operation>
+ </Platform>
+ <Platform Name="iOSDevice32">
+ <Operation>0</Operation>
+ </Platform>
+ <Platform Name="iOSDevice64">
+ <Operation>0</Operation>
+ </Platform>
+ <Platform Name="iOSSimulator">
+ <Operation>0</Operation>
+ </Platform>
+ <Platform Name="OSX32">
+ <Operation>0</Operation>
+ </Platform>
+ <Platform Name="Win32">
+ <Operation>0</Operation>
+ </Platform>
+ </DeployClass>
+ <DeployClass Name="iPad_Launch1024">
+ <Platform Name="iOSDevice32">
+ <Operation>1</Operation>
+ </Platform>
+ <Platform Name="iOSDevice64">
+ <Operation>1</Operation>
+ </Platform>
+ <Platform Name="iOSSimulator">
+ <Operation>1</Operation>
+ </Platform>
+ </DeployClass>
+ <DeployClass Name="iPad_Launch1536">
+ <Platform Name="iOSDevice32">
+ <Operation>1</Operation>
+ </Platform>
+ <Platform Name="iOSDevice64">
+ <Operation>1</Operation>
+ </Platform>
+ <Platform Name="iOSSimulator">
+ <Operation>1</Operation>
+ </Platform>
+ </DeployClass>
+ <DeployClass Name="iPad_Launch2048">
+ <Platform Name="iOSDevice32">
+ <Operation>1</Operation>
+ </Platform>
+ <Platform Name="iOSDevice64">
+ <Operation>1</Operation>
+ </Platform>
+ <Platform Name="iOSSimulator">
+ <Operation>1</Operation>
+ </Platform>
+ </DeployClass>
+ <DeployClass Name="iPad_Launch768">
+ <Platform Name="iOSDevice32">
+ <Operation>1</Operation>
+ </Platform>
+ <Platform Name="iOSDevice64">
+ <Operation>1</Operation>
+ </Platform>
+ <Platform Name="iOSSimulator">
+ <Operation>1</Operation>
+ </Platform>
+ </DeployClass>
+ <DeployClass Name="iPhone_Launch320">
+ <Platform Name="iOSDevice32">
+ <Operation>1</Operation>
+ </Platform>
+ <Platform Name="iOSDevice64">
+ <Operation>1</Operation>
+ </Platform>
+ <Platform Name="iOSSimulator">
+ <Operation>1</Operation>
+ </Platform>
+ </DeployClass>
+ <DeployClass Name="iPhone_Launch640">
+ <Platform Name="iOSDevice32">
+ <Operation>1</Operation>
+ </Platform>
+ <Platform Name="iOSDevice64">
+ <Operation>1</Operation>
+ </Platform>
+ <Platform Name="iOSSimulator">
+ <Operation>1</Operation>
+ </Platform>
+ </DeployClass>
+ <DeployClass Name="iPhone_Launch640x1136">
+ <Platform Name="iOSDevice32">
+ <Operation>1</Operation>
+ </Platform>
+ <Platform Name="iOSDevice64">
+ <Operation>1</Operation>
+ </Platform>
+ <Platform Name="iOSSimulator">
+ <Operation>1</Operation>
+ </Platform>
+ </DeployClass>
+ <DeployClass Name="ProjectAndroidManifest">
+ <Platform Name="Android">
+ <Operation>1</Operation>
+ </Platform>
+ </DeployClass>
+ <DeployClass Name="ProjectiOSDeviceDebug">
+ <Platform Name="iOSDevice32">
+ <RemoteDir>..\$(PROJECTNAME).app.dSYM\Contents\Resources\DWARF</RemoteDir>
+ <Operation>1</Operation>
+ </Platform>
+ <Platform Name="iOSDevice64">
+ <RemoteDir>..\$(PROJECTNAME).app.dSYM\Contents\Resources\DWARF</RemoteDir>
+ <Operation>1</Operation>
+ </Platform>
+ </DeployClass>
+ <DeployClass Name="ProjectiOSDeviceResourceRules"/>
+ <DeployClass Name="ProjectiOSEntitlements"/>
+ <DeployClass Name="ProjectiOSInfoPList"/>
+ <DeployClass Name="ProjectiOSResource">
+ <Platform Name="iOSDevice32">
+ <Operation>1</Operation>
+ </Platform>
+ <Platform Name="iOSDevice64">
+ <Operation>1</Operation>
+ </Platform>
+ <Platform Name="iOSSimulator">
+ <Operation>1</Operation>
+ </Platform>
+ </DeployClass>
+ <DeployClass Name="ProjectOSXEntitlements"/>
+ <DeployClass Name="ProjectOSXInfoPList"/>
+ <DeployClass Name="ProjectOSXResource">
+ <Platform Name="OSX32">
+ <RemoteDir>Contents\Resources</RemoteDir>
+ <Operation>1</Operation>
+ </Platform>
+ </DeployClass>
+ <DeployClass Required="true" Name="ProjectOutput">
+ <Platform Name="Android">
+ <RemoteDir>library\lib\armeabi-v7a</RemoteDir>
+ <Operation>1</Operation>
+ </Platform>
+ <Platform Name="iOSDevice32">
+ <Operation>1</Operation>
+ </Platform>
+ <Platform Name="iOSDevice64">
+ <Operation>1</Operation>
+ </Platform>
+ <Platform Name="iOSSimulator">
+ <Operation>1</Operation>
+ </Platform>
+ <Platform Name="Linux64">
+ <Operation>1</Operation>
+ </Platform>
+ <Platform Name="OSX32">
+ <Operation>1</Operation>
+ </Platform>
+ <Platform Name="Win32">
+ <Operation>0</Operation>
+ </Platform>
+ </DeployClass>
+ <DeployClass Name="ProjectUWPManifest">
+ <Platform Name="Win32">
+ <Operation>1</Operation>
+ </Platform>
+ <Platform Name="Win64">
+ <Operation>1</Operation>
+ </Platform>
+ </DeployClass>
+ <DeployClass Name="UWP_DelphiLogo150">
+ <Platform Name="Win32">
+ <RemoteDir>Assets</RemoteDir>
+ <Operation>1</Operation>
+ </Platform>
+ <Platform Name="Win64">
+ <RemoteDir>Assets</RemoteDir>
+ <Operation>1</Operation>
+ </Platform>
+ </DeployClass>
+ <DeployClass Name="UWP_DelphiLogo44">
+ <Platform Name="Win32">
+ <RemoteDir>Assets</RemoteDir>
+ <Operation>1</Operation>
+ </Platform>
+ <Platform Name="Win64">
+ <RemoteDir>Assets</RemoteDir>
+ <Operation>1</Operation>
+ </Platform>
+ </DeployClass>
+ <ProjectRoot Platform="Win64" Name="$(PROJECTNAME)"/>
+ <ProjectRoot Platform="iOSDevice64" Name="$(PROJECTNAME).app"/>
+ <ProjectRoot Platform="iOSDevice32" Name="$(PROJECTNAME).app"/>
+ <ProjectRoot Platform="Win32" Name="$(PROJECTNAME)"/>
+ <ProjectRoot Platform="Linux64" Name="$(PROJECTNAME)"/>
+ <ProjectRoot Platform="OSX32" Name="$(PROJECTNAME)"/>
+ <ProjectRoot Platform="Android" Name="$(PROJECTNAME)"/>
+ <ProjectRoot Platform="iOSSimulator" Name="$(PROJECTNAME).app"/>
+ </Deployment>
+ </BorlandProject>
+ <ProjectFileVersion>12</ProjectFileVersion>
+ </ProjectExtensions>
+ <ItemGroup>
+ <DelphiCompile Include="$(MainSource)">
+ <MainSource>MainSource</MainSource>
+ </DelphiCompile>
+ <DCCReference Include="Main.pas">
+ <Form>MainForm</Form>
+ </DCCReference>
+ <DCCReference Include="Model\Model.pas"/>
+ <DCCReference Include="ContactView.pas">
+ <Form>ContactViewForm</Form>
+ <DesignClass>TFrame</DesignClass>
+ </DCCReference>
+ <DCCReference Include="BasicView.pas">
+ <Form>BasicViewForm</Form>
+ <DesignClass>TFrame</DesignClass>
+ </DCCReference>
+ <DCCReference Include="BasicEdit.pas">
+ <Form>BasicEditForm</Form>
+ </DCCReference>
+ <DCCReference Include="ContactEdit.pas">
+ <Form>ContactEditForm</Form>
+ </DCCReference>
+ <DCCReference Include="PersonEdit.pas">
+ <Form>PersonEditForm</Form>
+ </DCCReference>
+ <DCCReference Include="CompanyEdit.pas">
+ <Form>CompanyEditForm</Form>
+ </DCCReference>
+ <DCCReference Include="DemoData.pas"/>
+ <DCCReference Include="ContactFilterEdit.pas">
+ <Form>ContactFilterEditForm</Form>
+ </DCCReference>
+ <DCCReference Include="MainData.pas">
+ <Form>MainDataModule</Form>
+ <DesignClass>TDataModule</DesignClass>
+ </DCCReference>
+ <DCCReference Include="ContactBrowse.pas">
+ <Form>ContactBrowseForm</Form>
+ </DCCReference>
+ <DCCReference Include="CompanyBrowse.pas">
+ <Form>CompanyBrowseForm</Form>
+ </DCCReference>
+ <DCCReference Include="PerformanceView.pas">
+ <Form>PerformanceViewForm</Form>
+ <DesignClass>TFrame</DesignClass>
+ </DCCReference>
+ <DCCReference Include="Welcome.pas">
+ <Form>WelcomeForm</Form>
+ </DCCReference>
+ <DCCReference Include="PersonBrowse.pas">
+ <Form>PersonBrowseForm</Form>
+ </DCCReference>
+ <DCCReference Include="BasicBrowse.pas">
+ <Form>BasicBrowseForm</Form>
+ </DCCReference>
+ <DCCReference Include="CountryBrowse.pas">
+ <Form>CountryBrowseForm</Form>
+ </DCCReference>
+ <DCCReference Include="DemoDataRequest.pas">
+ <Form>DemoDataRequestForm</Form>
+ </DCCReference>
+ <DCCReference Include="ContactSort.pas">
+ <Form>ContactSortForm</Form>
+ </DCCReference>
+ <DCCReference Include="CategoryBrowse.pas">
+ <Form>CategoryBrowseForm</Form>
+ </DCCReference>
+ <DCCReference Include="HelpView.pas">
+ <Form>HelpViewForm</Form>
+ <DesignClass>TFrame</DesignClass>
+ </DCCReference>
+ <DCCReference Include="QueryView.pas">
+ <Form>QueryViewForm</Form>
+ <DesignClass>TFrame</DesignClass>
+ </DCCReference>
+ <DCCReference Include="RandomData.pas"/>
+ <DCCReference Include="Stopwatch.pas"/>
+ <DCCReference Include="Utility.pas"/>
+ <BuildConfiguration Include="Debug">
+ <Key>Cfg_2</Key>
+ <CfgParent>Base</CfgParent>
+ </BuildConfiguration>
+ <BuildConfiguration Include="Base">
+ <Key>Base</Key>
+ </BuildConfiguration>
+ <BuildConfiguration Include="Release">
+ <Key>Cfg_1</Key>
+ <CfgParent>Base</CfgParent>
+ </BuildConfiguration>
+ </ItemGroup>
+ <Import Condition="Exists('$(BDS)\Bin\CodeGear.Delphi.Targets')" Project="$(BDS)\Bin\CodeGear.Delphi.Targets"/>
+ <Import Condition="Exists('$(APPDATA)\Embarcadero\$(BDSAPPDATABASEDIR)\$(PRODUCTVERSION)\UserTools.proj')" Project="$(APPDATA)\Embarcadero\$(BDSAPPDATABASEDIR)\$(PRODUCTVERSION)\UserTools.proj"/>
+ <Import Project="$(MSBuildProjectName).deployproj" Condition="Exists('$(MSBuildProjectName).deployproj')"/>
+</Project>
Property changes on: trunk/Demos/PrimerCross/Primer_D10_2.dproj
___________________________________________________________________
Added: svn:eol-style
## -0,0 +1 ##
+native
\ No newline at end of property
Added: svn:mime-type
## -0,0 +1 ##
+text/plain
\ No newline at end of property
Added: trunk/Demos/PrimerCross/Primer_D10_2.mdr
===================================================================
(Binary files differ)
Index: trunk/Demos/PrimerCross/Primer_D10_2.mdr
===================================================================
--- trunk/Demos/PrimerCross/Primer_D10_2.mdr 2017-04-04 14:40:13 UTC (rev 981)
+++ trunk/Demos/PrimerCross/Primer_D10_2.mdr 2017-04-04 15:28:27 UTC (rev 982)
Property ...
[truncated message content] |