Skip to content

Commit a220e51

Browse files
author
Frank Semmling
committed
Demos: Projektoptionen (Such- und Ausgabepfade)
sowie ungültige Methoden-Signaturen
1 parent 108ac1c commit a220e51

64 files changed

Lines changed: 1014 additions & 70 deletions

Some content is hidden

Large Commits have some content hidden by default. Use the searchbox below for content that may be hidden.

‎Demos/Demo01/Demo01.dproj‎

Lines changed: 4 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -7,7 +7,7 @@
77
<ProjectVersion>19.1</ProjectVersion>
88
<FrameworkType>VCL</FrameworkType>
99
<Base>True</Base>
10-
<Platform Condition="'$(Platform)'==''">Win64</Platform>
10+
<Platform Condition="'$(Platform)'==''">Win32</Platform>
1111
<TargetedPlatforms>3</TargetedPlatforms>
1212
<AppType>Application</AppType>
1313
</PropertyGroup>
@@ -58,6 +58,7 @@
5858
<Cfg_2>true</Cfg_2>
5959
<Base>true</Base>
6060
</PropertyGroup>
61+
<Import Project="..\SearchPath1.optset" Condition="'$(Base)'!='' And Exists('..\SearchPath1.optset')"/>
6162
<PropertyGroup Condition="'$(Base)'!=''">
6263
<SanitizedProjectName>Demo01</SanitizedProjectName>
6364
<DCC_Namespace>Vcl;Vcl.Imaging;Vcl.Touch;Vcl.Samples;Vcl.Shell;System;Xml;Data;Datasnap;Web;Soap;Winapi;$(DCC_Namespace)</DCC_Namespace>
@@ -66,6 +67,7 @@
6667
<DCC_DependencyCheckOutputName>Demo01.exe</DCC_DependencyCheckOutputName>
6768
<DCC_ImageBase>00400000</DCC_ImageBase>
6869
<DCC_Platform>x86</DCC_Platform>
70+
<CfgDependentOn>..\SearchPath1.optset</CfgDependentOn>
6971
</PropertyGroup>
7072
<PropertyGroup Condition="'$(Base_Win32)'!=''">
7173
<VerInfo_IncludeVerInfo>true</VerInfo_IncludeVerInfo>
@@ -121,6 +123,7 @@
121123
</BuildConfiguration>
122124
<BuildConfiguration Include="Base">
123125
<Key>Base</Key>
126+
<DependentOn>..\SearchPath1.optset</DependentOn>
124127
</BuildConfiguration>
125128
<BuildConfiguration Include="Release">
126129
<Key>Cfg_1</Key>

‎Demos/Demo01/Unit1.dfm‎

Lines changed: 12 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -98,25 +98,34 @@ object Form1: TForm1
9898
TabOrder = 2
9999
end
100100
object PythonEngine1: TPythonEngine
101+
DllName = 'python39.dll'
102+
DllPath = 'E:\EXE\Python'
103+
APIVersion = 1013
104+
RegVersion = '3.9'
105+
UseLastKnownVersion = False
101106
IO = PythonGUIInputOutput1
102107
Left = 32
108+
Top = 32
103109
end
104110
object OpenDialog1: TOpenDialog
105111
DefaultExt = '*.py'
106112
Filter = 'Python files|*.py|Text files|*.txt|All files|*.*'
107113
Title = 'Open'
108-
Left = 176
114+
Left = 248
115+
Top = 32
109116
end
110117
object SaveDialog1: TSaveDialog
111118
DefaultExt = '*.py'
112119
Filter = 'Python files|*.py|Text files|*.txt|All files|*.*'
113120
Title = 'Save As'
114-
Left = 208
121+
Left = 344
122+
Top = 32
115123
end
116124
object PythonGUIInputOutput1: TPythonGUIInputOutput
117125
UnicodeIO = True
118126
RawOutput = False
119127
Output = Memo2
120-
Left = 64
128+
Left = 144
129+
Top = 32
121130
end
122131
end

‎Demos/Demo02/Demo02.dproj‎

Lines changed: 695 additions & 1 deletion
Large diffs are not rendered by default.

‎Demos/Demo02/Unit1.dfm‎

Lines changed: 5 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -92,6 +92,11 @@ object Form1: TForm1
9292
end
9393
end
9494
object PythonEngine1: TPythonEngine
95+
DllName = 'python39.dll'
96+
DllPath = 'E:\EXE\Python'
97+
APIVersion = 1013
98+
RegVersion = '3.10'
99+
UseLastKnownVersion = False
95100
IO = PythonGUIInputOutput1
96101
Left = 32
97102
end

‎Demos/Demo03/Demo03.dproj‎

Lines changed: 6 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -8,7 +8,7 @@
88
<AppType>Application</AppType>
99
<FrameworkType>VCL</FrameworkType>
1010
<ProjectVersion>19.1</ProjectVersion>
11-
<Platform Condition="'$(Platform)'==''">Win64</Platform>
11+
<Platform Condition="'$(Platform)'==''">Win32</Platform>
1212
</PropertyGroup>
1313
<PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''">
1414
<Base>true</Base>
@@ -57,6 +57,7 @@
5757
<Cfg_2>true</Cfg_2>
5858
<Base>true</Base>
5959
</PropertyGroup>
60+
<Import Project="..\SearchPath1.optset" Condition="'$(Base)'!='' And Exists('..\SearchPath1.optset')"/>
6061
<PropertyGroup Condition="'$(Base)'!=''">
6162
<DCC_E>false</DCC_E>
6263
<DCC_F>false</DCC_F>
@@ -68,9 +69,10 @@
6869
<DCC_Namespace>Vcl;Vcl.Imaging;Vcl.Touch;Vcl.Samples;Vcl.Shell;System;Xml;Data;Datasnap;Web;Soap;Winapi;$(DCC_Namespace)</DCC_Namespace>
6970
<VerInfo_Locale>1033</VerInfo_Locale>
7071
<VerInfo_Keys>CompanyName=;FileDescription=;FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProductName=;ProductVersion=1.0.0.0;Comments=;CFBundleName=</VerInfo_Keys>
72+
<CfgDependentOn>..\SearchPath1.optset</CfgDependentOn>
7173
</PropertyGroup>
7274
<PropertyGroup Condition="'$(Base_Win32)'!=''">
73-
<DCC_Namespace>Winapi;System.Win;Data.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;Bde;$(DCC_Namespace)</DCC_Namespace>
75+
<DCC_Namespace>System.Win;Data.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;Bde;$(DCC_Namespace)</DCC_Namespace>
7476
<BT_BuildType>Debug</BT_BuildType>
7577
<VerInfo_IncludeVerInfo>true</VerInfo_IncludeVerInfo>
7678
<VerInfo_Keys>CompanyName=;FileDescription=$(MSBuildProjectName);FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProductName=$(MSBuildProjectName);ProductVersion=1.0.0.0;Comments=;ProgramID=com.embarcadero.$(MSBuildProjectName)</VerInfo_Keys>
@@ -127,14 +129,15 @@
127129
<MainSource>MainSource</MainSource>
128130
</DelphiCompile>
129131
<DCCReference Include="Unit1.pas">
130-
<Form>Form1`</Form>
132+
<Form>Form1</Form>
131133
</DCCReference>
132134
<BuildConfiguration Include="Debug">
133135
<Key>Cfg_2</Key>
134136
<CfgParent>Base</CfgParent>
135137
</BuildConfiguration>
136138
<BuildConfiguration Include="Base">
137139
<Key>Base</Key>
140+
<DependentOn>..\SearchPath1.optset</DependentOn>
138141
</BuildConfiguration>
139142
<BuildConfiguration Include="Release">
140143
<Key>Cfg_1</Key>

‎Demos/Demo03/Unit1.dfm‎

Lines changed: 5 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -111,6 +111,11 @@ object Form1: TForm1
111111
TabOrder = 2
112112
end
113113
object PythonEngine1: TPythonEngine
114+
DllName = 'python39.dll'
115+
DllPath = 'E:\EXE\Python'
116+
APIVersion = 1013
117+
RegVersion = '3.10'
118+
UseLastKnownVersion = False
114119
InitScript.Strings = (
115120
'import sys'
116121
'print("Python Dll: ", sys.version)'

‎Demos/Demo04/Demo04.dproj‎

Lines changed: 4 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -7,7 +7,7 @@
77
<ProjectVersion>19.1</ProjectVersion>
88
<FrameworkType>VCL</FrameworkType>
99
<Base>True</Base>
10-
<Platform Condition="'$(Platform)'==''">Win64</Platform>
10+
<Platform Condition="'$(Platform)'==''">Win32</Platform>
1111
<TargetedPlatforms>3</TargetedPlatforms>
1212
<AppType>Application</AppType>
1313
</PropertyGroup>
@@ -58,6 +58,7 @@
5858
<Cfg_2>true</Cfg_2>
5959
<Base>true</Base>
6060
</PropertyGroup>
61+
<Import Project="..\SearchPath1.optset" Condition="'$(Base)'!='' And Exists('..\SearchPath1.optset')"/>
6162
<PropertyGroup Condition="'$(Base)'!=''">
6263
<DCC_DependencyCheckOutputName>Demo04.exe</DCC_DependencyCheckOutputName>
6364
<DCC_ImageBase>00400000</DCC_ImageBase>
@@ -66,6 +67,7 @@
6667
<DCC_Namespace>Vcl;Vcl.Imaging;Vcl.Touch;Vcl.Samples;Vcl.Shell;System;Xml;Data;Datasnap;Web;Soap;Winapi;$(DCC_Namespace)</DCC_Namespace>
6768
<VerInfo_Locale>1033</VerInfo_Locale>
6869
<VerInfo_Keys>CompanyName=;FileDescription=;FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProductName=;ProductVersion=1.0.0.0;Comments=</VerInfo_Keys>
70+
<CfgDependentOn>..\SearchPath1.optset</CfgDependentOn>
6971
</PropertyGroup>
7072
<PropertyGroup Condition="'$(Base_Win32)'!=''">
7173
<DCC_Namespace>System.Win;Data.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;Bde;$(DCC_Namespace)</DCC_Namespace>
@@ -128,6 +130,7 @@
128130
</BuildConfiguration>
129131
<BuildConfiguration Include="Base">
130132
<Key>Base</Key>
133+
<DependentOn>..\SearchPath1.optset</DependentOn>
131134
</BuildConfiguration>
132135
<BuildConfiguration Include="Release">
133136
<Key>Cfg_1</Key>

‎Demos/Demo04/Unit1.dfm‎

1.31 KB
Binary file not shown.

‎Demos/Demo05/Demo05.dproj‎

Lines changed: 4 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -7,7 +7,7 @@
77
<ProjectVersion>19.1</ProjectVersion>
88
<FrameworkType>VCL</FrameworkType>
99
<Base>True</Base>
10-
<Platform Condition="'$(Platform)'==''">Win64</Platform>
10+
<Platform Condition="'$(Platform)'==''">Win32</Platform>
1111
<TargetedPlatforms>3</TargetedPlatforms>
1212
<AppType>Application</AppType>
1313
</PropertyGroup>
@@ -58,6 +58,7 @@
5858
<Cfg_2>true</Cfg_2>
5959
<Base>true</Base>
6060
</PropertyGroup>
61+
<Import Project="..\SearchPath1.optset" Condition="'$(Base)'!='' And Exists('..\SearchPath1.optset')"/>
6162
<PropertyGroup Condition="'$(Base)'!=''">
6263
<DCC_DependencyCheckOutputName>Demo05.exe</DCC_DependencyCheckOutputName>
6364
<DCC_ImageBase>00400000</DCC_ImageBase>
@@ -66,6 +67,7 @@
6667
<DCC_Namespace>Vcl;Vcl.Imaging;Vcl.Touch;Vcl.Samples;Vcl.Shell;System;Xml;Data;Datasnap;Web;Soap;Winapi;$(DCC_Namespace)</DCC_Namespace>
6768
<VerInfo_Locale>1033</VerInfo_Locale>
6869
<VerInfo_Keys>CompanyName=;FileDescription=;FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProductName=;ProductVersion=1.0.0.0;Comments=</VerInfo_Keys>
70+
<CfgDependentOn>..\SearchPath1.optset</CfgDependentOn>
6971
</PropertyGroup>
7072
<PropertyGroup Condition="'$(Base_Win32)'!=''">
7173
<DCC_Namespace>System.Win;Data.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;Bde;$(DCC_Namespace)</DCC_Namespace>
@@ -127,6 +129,7 @@
127129
</BuildConfiguration>
128130
<BuildConfiguration Include="Base">
129131
<Key>Base</Key>
132+
<DependentOn>..\SearchPath1.optset</DependentOn>
130133
</BuildConfiguration>
131134
<BuildConfiguration Include="Release">
132135
<Key>Cfg_1</Key>

‎Demos/Demo05/Unit1.dfm‎

Lines changed: 5 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -94,6 +94,11 @@ object Form1: TForm1
9494
TabOrder = 2
9595
end
9696
object PythonEngine1: TPythonEngine
97+
DllName = 'python39.dll'
98+
DllPath = 'E:\EXE\Python'
99+
APIVersion = 1013
100+
RegVersion = '3.10'
101+
UseLastKnownVersion = False
97102
InitScript.Strings = (
98103
'import sys'
99104
'print ("Python Dll: ", sys.version)'

0 commit comments

Comments
 (0)