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] |