Linuxでも動作します

Community Edition すごいですね

diff --git a/ProjectGroup1.groupproj b/ProjectGroup1.groupproj
index 88e2688..674006a 100644 (file)
--- a/ProjectGroup1.groupproj
+++ b/ProjectGroup1.groupproj
@@ -15,6 +15,9 @@
         <Projects Include="bbs_isapi.dproj">
             <Dependencies/>
         </Projects>
+        <Projects Include="linuxBBS.dproj">
+            <Dependencies/>
+        </Projects>
     </ItemGroup>
     <ProjectExtensions>
         <Borland.Personality>Default.Personality.12</Borland.Personality>
@@ -59,14 +62,23 @@
     <Target Name="bbs_isapi:Make">
         <MSBuild Projects="bbs_isapi.dproj" Targets="Make"/>
     </Target>
+    <Target Name="linuxBBS">
+        <MSBuild Projects="linuxBBS.dproj"/>
+    </Target>
+    <Target Name="linuxBBS:Clean">
+        <MSBuild Projects="linuxBBS.dproj" Targets="Clean"/>
+    </Target>
+    <Target Name="linuxBBS:Make">
+        <MSBuild Projects="linuxBBS.dproj" Targets="Make"/>
+    </Target>
     <Target Name="Build">
-        <CallTarget Targets="newbbs;yourBBS;Project1;bbs_isapi"/>
+        <CallTarget Targets="newbbs;yourBBS;Project1;bbs_isapi;linuxBBS"/>
     </Target>
     <Target Name="Clean">
-        <CallTarget Targets="newbbs:Clean;yourBBS:Clean;Project1:Clean;bbs_isapi:Clean"/>
+        <CallTarget Targets="newbbs:Clean;yourBBS:Clean;Project1:Clean;bbs_isapi:Clean;linuxBBS:Clean"/>
     </Target>
     <Target Name="Make">
-        <CallTarget Targets="newbbs:Make;yourBBS:Make;Project1:Make;bbs_isapi:Make"/>
+        <CallTarget Targets="newbbs:Make;yourBBS:Make;Project1:Make;bbs_isapi:Make;linuxBBS:Make"/>
     </Target>
     <Import Project="$(BDS)\Bin\CodeGear.Group.Targets" Condition="Exists('$(BDS)\Bin\CodeGear.Group.Targets')"/>
 </Project>

diff --git a/WebModuleUnit1.dfm b/WebModuleUnit1.dfm
index b40d611..599d258 100644 (file)
--- a/WebModuleUnit1.dfm
+++ b/WebModuleUnit1.dfm
@@ -1816,6 +1816,7 @@ object WebModule1: TWebModule1
   end
   object FDConnection1: TFDConnection
     Params.Strings = (
+      'User_Name=kainushi'
       'ConnectionDef=first_sql')
     Left = 632
     Top = 56

diff --git a/tool/Unit2.dfm b/tool/Unit2.dfm
index 091969d..211e9c3 100644 (file)
--- a/tool/Unit2.dfm
+++ b/tool/Unit2.dfm
@@ -889,13 +889,12 @@ object Form1: TForm1
   end
   object FDConnection1: TFDConnection
     Params.Strings = (
+      'User_Name=kainushi'
       'ConnectionDef=first_sql')
-    Connected = True
     Left = 320
     Top = 24
   end
   object FDTable1: TFDTable
-    Active = True
     IndexFieldNames = 'id'
     Connection = FDConnection1
     FetchOptions.AssignedValues = [evDetailCascade, evDetailServerCascade]