Changeset 13 for os


Ignore:
Timestamp:
Feb 29, 2016, 3:09:13 PM (9 years ago)
Author:
chronos
Message:
  • Modified: Allow receive mouse move mesages to focused form even if mouse position is outside of form area.
  • Fixed: Pass key press messages only to focused form and focused TControl like TEdit.
Location:
os/trunk
Files:
6 edited

Legend:

Unmodified
Added
Removed

  • os/trunk/System/LDOS.Kernel.pas

    r8 r13  
    5555  TScreen = class(TComponent)
    5656  private
     57    function GetFocusedForm: TForm;
     58    procedure SetFocusedForm(const Value: TForm);
    5759  public
    5860    Kernel: TKernel;
    … …  
    6365    procedure HandleResize;
    6466    procedure Paint;
    65     procedure FocusForm(Form: TForm);
     67    property FocusedForm: TForm read GetFocusedForm write SetFocusedForm;
    6668    constructor Create; override;
    6769    destructor Destroy; override;
    … …  
    7880  TMouse = class
    7981    Kernel: TKernel;
     82    MovedForm: TForm;
    8083    procedure HandleMove(Position: TPoint);
    8184    procedure HandleDown(Position: TPoint);
    … …  
    233236end;
    234237
    235 procedure TScreen.FocusForm(Form: TForm);
    236 var
    237   I: Integer;
    238   FormIndex: Integer;
    239 begin
    240   FormIndex := Forms.IndexOf(Form);
    241   for I := 0 to Forms.Count - 1 do
    242     Forms[I].Focused := I = FormIndex;
    243 
    244   Forms.Move(FormIndex, Forms.Count - 1);
    245   Paint;
     238function TScreen.GetFocusedForm: TForm;
     239begin
     240  if Forms.Count > 0 then
     241   Result := Forms[Forms.Count - 1]
     242   else Result := nil;
    246243end;
    247244
    … …  
    272269end;
    273270
     271procedure TScreen.SetFocusedForm(const Value: TForm);
     272var
     273  I: Integer;
     274  FormIndex: Integer;
     275begin
     276  FormIndex := Forms.IndexOf(Value);
     277  for I := 0 to Forms.Count - 1 do
     278    Forms[I].Focused := I = FormIndex;
     279
     280  Forms.Move(FormIndex, Forms.Count - 1);
     281  Paint;
     282end;
     283
    274284{ TDriver }
    275285
    … …  
    313323  try
    314324    for Form in Kernel.Screen.Forms do
     325    if Form.Focused then
    315326    if Form.HandleMessage(NewMessage) then begin
    316327      Break;
    … …  
    356367begin
    357368  NewMessage := TMessageMouseDown.Create;
     369  NewMessage.Position := Position;
     370  try
     371    for Form in Kernel.Screen.Forms do
     372    if Form.Bounds.Contains(Position) then begin
     373      MovedForm := Form;
     374      if Form.HandleMessage(NewMessage) then begin
     375        Break;
     376      end;
     377    end;
     378  finally
     379    NewMessage.Destroy;
     380  end;
     381end;
     382
     383procedure TMouse.HandleMove(Position: TPoint);
     384var
     385  Form: TForm;
     386  NewMessage: TMessageMouseMove;
     387begin
     388  NewMessage := TMessageMouseMove.Create;
    358389  NewMessage.Position := Position;
    359390  try
    … …  
    364395      end;
    365396    end;
    366   finally
    367     NewMessage.Destroy;
    368   end;
    369 end;
    370 
    371 procedure TMouse.HandleMove(Position: TPoint);
    372 var
    373   Form: TForm;
    374   NewMessage: TMessageMouseMove;
    375 begin
    376   NewMessage := TMessageMouseMove.Create;
     397    if Assigned(Kernel.Screen.FocusedForm) then
     398      Kernel.Screen.FocusedForm.HandleMessage(NewMessage);
     399  finally
     400    NewMessage.Destroy;
     401  end;
     402end;
     403
     404procedure TMouse.HandleUp(Position: TPoint);
     405var
     406  Form: TForm;
     407  NewMessage: TMessageMouseUp;
     408begin
     409  NewMessage := TMessageMouseUp.Create;
    377410  NewMessage.Position := Position;
    378411  try
    … …  
    383416      end;
    384417    end;
    385   finally
    386     NewMessage.Destroy;
    387   end;
    388 end;
    389 
    390 procedure TMouse.HandleUp(Position: TPoint);
    391 var
    392   Form: TForm;
    393   NewMessage: TMessageMouseUp;
    394 begin
    395   NewMessage := TMessageMouseUp.Create;
    396   NewMessage.Position := Position;
    397   try
    398     for Form in Kernel.Screen.Forms do
    399     if Form.Bounds.Contains(Position) then begin
    400       if Form.HandleMessage(NewMessage) then begin
    401         Break;
    402       end;
    403     end;
     418    if Assigned(Kernel.Screen.FocusedForm) then
     419      Kernel.Screen.FocusedForm.HandleMessage(NewMessage);
    404420  finally
    405421    NewMessage.Destroy;

  • os/trunk/Xvcl/Xvcl.Controls.pas

    r8 r13  
    6060    FOnMouseUp: TNotifyEvent;
    6161    FOnKeyPress: TNotifyEvent;
     62    FFocused: Boolean;
    6263    function GetCanvas: TCanvas;
    6364    procedure SetParent(const Value: TWinControl); virtual;
    6465    procedure SetColor(const Value: TColor);
     66    procedure SetFocused(const Value: Boolean);
    6567  protected
    6668    function GetVideoDevice: TVideoDevice; virtual;
    … …  
    7981    property VideoDevice: TVideoDevice read GetVideoDevice;
    8082    property Color: TColor read FColor write SetColor;
     83    property Focused: Boolean read FFocused write SetFocused;
    8184    property OnClick: TNotifyEvent read FOnClick write FOnClick;
    8285    property OnMouseDown: TNotifyEvent read FOnMouseDown write FOnMouseDown;
    … …  
    8891  protected
    8992    function HandleMessage(Message: TMessage): Boolean; override;
     93  private
     94   procedure ClearFocus;
    9095  public
    9196    Controls: TList<TControl>;
    … …  
    193198    if Visible then Paint;
    194199  end;
     200end;
     201
     202procedure TControl.SetFocused(const Value: Boolean);
     203begin
     204  if Value then FParent.ClearFocus;
     205  FFocused := Value;
    195206end;
    196207
    … …  
    268279
    269280{ TWinControl }
     281
     282procedure TWinControl.ClearFocus;
     283var
     284 Control: TControl;
     285begin
     286  for Control in Controls do
     287    Control.Focused := False;
     288end;
    270289
    271290constructor TWinControl.Create;
    … …  
    342361begin
    343362  Result := False;
    344   if Message is TMessageKeyPress then
     363  if (Message is TMessageMouseDown) then
     364   Focused := True
     365  else
     366  if (Message is TMessageKeyPress) and Focused then
    345367  with TMessageKeyPress(Message) do begin
    346368    if Assigned(FOnKeyPress) then FOnKeyPress(Self);

  • os/trunk/Xvcl/Xvcl.Forms.pas

    r5 r13  
    9090      Move.StartMousePos := Position;
    9191      Move.Active := True;
    92      Result := True;
     92      Result := True;
    9393    end;
    9494  end else
    … …  
    137137  if FFocused <> Value then begin
    138138    FFocused := Value;
    139     if Value then TScreen(Screen).FocusForm(Self);
     139    if Value then TScreen(Screen).FocusedForm := Self;
    140140  end;
    141141end;

  • os/trunk/lddesktop.dproj

    r6 r13  
    22    <PropertyGroup>
    33        <ProjectGuid>{B32416A8-1A9B-433D-A818-FE7B8461763B}</ProjectGuid>
    4         <ProjectVersion>14.6</ProjectVersion>
     4        <ProjectVersion>18.0</ProjectVersion>
    55        <FrameworkType>VCL</FrameworkType>
    66        <MainSource>lddesktop.dpr</MainSource>
    … …  
    1919        <Base>true</Base>
    2020    </PropertyGroup>
    21     <PropertyGroup Condition="('$(Platform)'=='Win64' and '$(Base)'=='true') or '$(Base_Win64)'!=''">
    22         <Base_Win64>true</Base_Win64>
    23         <CfgParent>Base</CfgParent>
    24         <Base>true</Base>
    25     </PropertyGroup>
    2621    <PropertyGroup Condition="'$(Config)'=='Debug' or '$(Cfg_1)'!=''">
    2722        <Cfg_1>true</Cfg_1>
    … …  
    4136    </PropertyGroup>
    4237    <PropertyGroup Condition="'$(Base)'!=''">
     38        <SanitizedProjectName>lddesktop</SanitizedProjectName>
    4339        <Icon_MainIcon>$(BDS)\bin\delphi_PROJECTICON.ico</Icon_MainIcon>
    4440        <DCC_Namespace>System;Xml;Data;Datasnap;Web;Soap;Vcl;Vcl.Imaging;Vcl.Touch;Vcl.Samples;Vcl.Shell;$(DCC_Namespace)</DCC_Namespace>
    … …  
    5248    </PropertyGroup>
    5349    <PropertyGroup Condition="'$(Base_Win32)'!=''">
     50        <AppEnableRuntimeThemes>true</AppEnableRuntimeThemes>
    5451        <VerInfo_IncludeVerInfo>true</VerInfo_IncludeVerInfo>
    5552        <DCC_UsePackage>bindcompfmx;DBXSqliteDriver;vcldbx;fmx;rtl;dbrtl;DbxClientDriver;IndySystem;TeeDB;bindcomp;inetdb;vclib;inetdbbde;DBXInterBaseDriver;DataSnapClient;DataSnapCommon;DBXOdbcDriver;DataSnapServer;Tee;DataSnapProviderClient;xmlrtl;svnui;ibxpress;DbxCommonDriver;DBXSybaseASEDriver;vclimg;IndyProtocols;dbxcds;DBXMySQLDriver;MetropolisUILiveTile;vclactnband;bindengine;vcldb;soaprtl;bindcompdbx;vcldsnap;bindcompvcl;FMXTee;TeeUI;vclie;vcltouch;DBXDb2Driver;websnap;DBXOracleDriver;CustomIPTransport;vclribbon;VclSmp;dsnap;IndyIPServer;DBXInformixDriver;Intraweb;fmxase;vcl;IndyCore;DataSnapConnectors;IndyIPCommon;CloudService;DBXMSSQLDriver;dsnapcon;DBXFirebirdDriver;FmxTeeUI;inet;fmxobj;vclx;inetdbxpress;webdsnap;svn;DBXSybaseASADriver;fmxdae;bdertl;dbexpress;adortl;DataSnapIndy10ServerTransport;IndyIPClient;$(DCC_UsePackage)</DCC_UsePackage>
    … …  
    5855        <VerInfo_Keys>CompanyName=;FileDescription=;FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProductName=;ProductVersion=1.0.0.0;Comments=</VerInfo_Keys>
    5956        <DCC_Namespace>Winapi;System.Win;Data.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;Bde;$(DCC_Namespace)</DCC_Namespace>
    60     </PropertyGroup>
    61     <PropertyGroup Condition="'$(Base_Win64)'!=''">
    62         <DCC_UsePackage>bindcompfmx;DBXSqliteDriver;fmx;rtl;dbrtl;DbxClientDriver;IndySystem;TeeDB;bindcomp;inetdb;vclib;DBXInterBaseDriver;DataSnapClient;DataSnapCommon;DBXOdbcDriver;DataSnapServer;Tee;DataSnapProviderClient;xmlrtl;ibxpress;DbxCommonDriver;DBXSybaseASEDriver;vclimg;IndyProtocols;dbxcds;DBXMySQLDriver;MetropolisUILiveTile;vclactnband;bindengine;vcldb;soaprtl;bindcompdbx;vcldsnap;bindcompvcl;FMXTee;TeeUI;vclie;vcltouch;DBXDb2Driver;websnap;DBXOracleDriver;CustomIPTransport;vclribbon;VclSmp;dsnap;IndyIPServer;DBXInformixDriver;Intraweb;fmxase;vcl;IndyCore;DataSnapConnectors;IndyIPCommon;CloudService;DBXMSSQLDriver;dsnapcon;DBXFirebirdDriver;FmxTeeUI;inet;fmxobj;vclx;inetdbxpress;webdsnap;DBXSybaseASADriver;fmxdae;dbexpress;adortl;DataSnapIndy10ServerTransport;IndyIPClient;$(DCC_UsePackage)</DCC_UsePackage>
    6357    </PropertyGroup>
    6458    <PropertyGroup Condition="'$(Cfg_1)'!=''">
    … …  
    7771        <DCC_Define>RELEASE;$(DCC_Define)</DCC_Define>
    7872        <DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
    79         <DCC_DebugInformation>false</DCC_DebugInformation>
     73        <DCC_DebugInformation>0</DCC_DebugInformation>
    8074    </PropertyGroup>
    8175    <ItemGroup>
    … …  
    159153                </Source>
    160154            </Delphi.Personality>
    161             <Deployment/>
     155            <Deployment Version="2">
     156                <DeployClass Name="DependencyModule">
     157                    <Platform Name="Win32">
     158                        <Operation>0</Operation>
     159                        <Extensions>.dll;.bpl</Extensions>
     160                    </Platform>
     161                    <Platform Name="iOSDevice64">
     162                        <Operation>1</Operation>
     163                        <Extensions>.dylib</Extensions>
     164                    </Platform>
     165                    <Platform Name="OSX32">
     166                        <RemoteDir>Contents\MacOS</RemoteDir>
     167                        <Operation>1</Operation>
     168                        <Extensions>.dylib</Extensions>
     169                    </Platform>
     170                    <Platform Name="iOSDevice32">
     171                        <Operation>1</Operation>
     172                        <Extensions>.dylib</Extensions>
     173                    </Platform>
     174                    <Platform Name="iOSSimulator">
     175                        <Operation>1</Operation>
     176                        <Extensions>.dylib</Extensions>
     177                    </Platform>
     178                </DeployClass>
     179                <DeployClass Name="ProjectOSXResource">
     180                    <Platform Name="OSX32">
     181                        <RemoteDir>Contents\Resources</RemoteDir>
     182                        <Operation>1</Operation>
     183                    </Platform>
     184                </DeployClass>
     185                <DeployClass Name="AndroidClassesDexFile">
     186                    <Platform Name="Android">
     187                        <RemoteDir>classes</RemoteDir>
     188                        <Operation>1</Operation>
     189                    </Platform>
     190                </DeployClass>
     191                <DeployClass Name="AdditionalDebugSymbols">
     192                    <Platform Name="Win32">
     193                        <RemoteDir>Contents\MacOS</RemoteDir>
     194                        <Operation>0</Operation>
     195                    </Platform>
     196                    <Platform Name="iOSSimulator">
     197                        <Operation>1</Operation>
     198                    </Platform>
     199                    <Platform Name="OSX32">
     200                        <RemoteDir>Contents\MacOS</RemoteDir>
     201                        <Operation>1</Operation>
     202                    </Platform>
     203                </DeployClass>
     204                <DeployClass Name="iPad_Launch768">
     205                    <Platform Name="iOSSimulator">
     206                        <Operation>1</Operation>
     207                    </Platform>
     208                    <Platform Name="iOSDevice64">
     209                        <Operation>1</Operation>
     210                    </Platform>
     211                    <Platform Name="iOSDevice32">
     212                        <Operation>1</Operation>
     213                    </Platform>
     214                </DeployClass>
     215                <DeployClass Name="Android_LauncherIcon144">
     216                    <Platform Name="Android">
     217                        <RemoteDir>res\drawable-xxhdpi</RemoteDir>
     218                        <Operation>1</Operation>
     219                    </Platform>
     220                </DeployClass>
     221                <DeployClass Name="AndroidLibnativeMipsFile">
     222                    <Platform Name="Android">
     223                        <RemoteDir>library\lib\mips</RemoteDir>
     224                        <Operation>1</Operation>
     225                    </Platform>
     226                </DeployClass>
     227                <DeployClass Required="true" Name="ProjectOutput">
     228                    <Platform Name="Win32">
     229                        <Operation>0</Operation>
     230                    </Platform>
     231                    <Platform Name="iOSDevice64">
     232                        <Operation>1</Operation>
     233                    </Platform>
     234                    <Platform Name="OSX32">
     235                        <RemoteDir>Contents\MacOS</RemoteDir>
     236                        <Operation>1</Operation>
     237                    </Platform>
     238                    <Platform Name="iOSDevice32">
     239                        <Operation>1</Operation>
     240                    </Platform>
     241                    <Platform Name="Android">
     242                        <RemoteDir>library\lib\armeabi-v7a</RemoteDir>
     243                        <Operation>1</Operation>
     244                    </Platform>
     245                    <Platform Name="iOSSimulator">
     246                        <Operation>1</Operation>
     247                    </Platform>
     248                </DeployClass>
     249                <DeployClass Name="DependencyFramework">
     250                    <Platform Name="Win32">
     251                        <Operation>0</Operation>
     252                    </Platform>
     253                    <Platform Name="OSX32">
     254                        <RemoteDir>Contents\MacOS</RemoteDir>
     255                        <Operation>1</Operation>
     256                        <Extensions>.framework</Extensions>
     257                    </Platform>
     258                </DeployClass>
     259                <DeployClass Name="iPhone_Launch640">
     260                    <Platform Name="iOSSimulator">
     261                        <Operation>1</Operation>
     262                    </Platform>
     263                    <Platform Name="iOSDevice64">
     264                        <Operation>1</Operation>
     265                    </Platform>
     266                    <Platform Name="iOSDevice32">
     267                        <Operation>1</Operation>
     268                    </Platform>
     269                </DeployClass>
     270                <DeployClass Name="iPad_Launch1024">
     271                    <Platform Name="iOSSimulator">
     272                        <Operation>1</Operation>
     273                    </Platform>
     274                    <Platform Name="iOSDevice64">
     275                        <Operation>1</Operation>
     276                    </Platform>
     277                    <Platform Name="iOSDevice32">
     278                        <Operation>1</Operation>
     279                    </Platform>
     280                </DeployClass>
     281                <DeployClass Name="ProjectiOSDeviceDebug">
     282                    <Platform Name="iOSDevice64">
     283                        <RemoteDir>..\$(PROJECTNAME).app.dSYM\Contents\Resources\DWARF</RemoteDir>
     284                        <Operation>1</Operation>
     285                    </Platform>
     286                    <Platform Name="iOSDevice32">
     287                        <RemoteDir>..\$(PROJECTNAME).app.dSYM\Contents\Resources\DWARF</RemoteDir>
     288                        <Operation>1</Operation>
     289                    </Platform>
     290                </DeployClass>
     291                <DeployClass Name="AndroidLibnativeX86File">
     292                    <Platform Name="Android">
     293                        <RemoteDir>library\lib\x86</RemoteDir>
     294                        <Operation>1</Operation>
     295                    </Platform>
     296                </DeployClass>
     297                <DeployClass Name="iPhone_Launch320">
     298                    <Platform Name="iOSSimulator">
     299                        <Operation>1</Operation>
     300                    </Platform>
     301                    <Platform Name="iOSDevice64">
     302                        <Operation>1</Operation>
     303                    </Platform>
     304                    <Platform Name="iOSDevice32">
     305                        <Operation>1</Operation>
     306                    </Platform>
     307                </DeployClass>
     308                <DeployClass Name="ProjectiOSInfoPList">
     309                    <Platform Name="iOSSimulator">
     310                        <Operation>1</Operation>
     311                    </Platform>
     312                    <Platform Name="iOSDevice64">
     313                        <Operation>1</Operation>
     314                    </Platform>
     315                    <Platform Name="iOSDevice32">
     316                        <Operation>1</Operation>
     317                    </Platform>
     318                </DeployClass>
     319                <DeployClass Name="AndroidLibnativeArmeabiFile">
     320                    <Platform Name="Android">
     321                        <RemoteDir>library\lib\armeabi</RemoteDir>
     322                        <Operation>1</Operation>
     323                    </Platform>
     324                </DeployClass>
     325                <DeployClass Name="DebugSymbols">
     326                    <Platform Name="Win32">
     327                        <Operation>0</Operation>
     328                    </Platform>
     329                    <Platform Name="iOSSimulator">
     330                        <Operation>1</Operation>
     331                    </Platform>
     332                    <Platform Name="OSX32">
     333                        <RemoteDir>Contents\MacOS</RemoteDir>
     334                        <Operation>1</Operation>
     335                    </Platform>
     336                </DeployClass>
     337                <DeployClass Name="iPad_Launch1536">
     338                    <Platform Name="iOSSimulator">
     339                        <Operation>1</Operation>
     340                    </Platform>
     341                    <Platform Name="iOSDevice64">
     342                        <Operation>1</Operation>
     343                    </Platform>
     344                    <Platform Name="iOSDevice32">
     345                        <Operation>1</Operation>
     346                    </Platform>
     347                </DeployClass>
     348                <DeployClass Name="Android_SplashImage470">
     349                    <Platform Name="Android">
     350                        <RemoteDir>res\drawable-normal</RemoteDir>
     351                        <Operation>1</Operation>
     352                    </Platform>
     353                </DeployClass>
     354                <DeployClass Name="Android_LauncherIcon96">
     355                    <Platform Name="Android">
     356                        <RemoteDir>res\drawable-xhdpi</RemoteDir>
     357                        <Operation>1</Operation>
     358                    </Platform>
     359                </DeployClass>
     360                <DeployClass Name="Android_SplashImage640">
     361                    <Platform Name="Android">
     362                        <RemoteDir>res\drawable-large</RemoteDir>
     363                        <Operation>1</Operation>
     364                    </Platform>
     365                </DeployClass>
     366                <DeployClass Name="iPhone_Launch640x1136">
     367                    <Platform Name="iOSSimulator">
     368                        <Operation>1</Operation>
     369                    </Platform>
     370                    <Platform Name="iOSDevice64">
     371                        <Operation>1</Operation>
     372                    </Platform>
     373                    <Platform Name="iOSDevice32">
     374                        <Operation>1</Operation>
     375                    </Platform>
     376                </DeployClass>
     377                <DeployClass Name="ProjectiOSEntitlements">
     378                    <Platform Name="iOSDevice64">
     379                        <RemoteDir>../</RemoteDir>
     380                        <Operation>1</Operation>
     381                    </Platform>
     382                    <Platform Name="iOSDevice32">
     383                        <RemoteDir>../</RemoteDir>
     384                        <Operation>1</Operation>
     385                    </Platform>
     386                </DeployClass>
     387                <DeployClass Name="Android_LauncherIcon72">
     388                    <Platform Name="Android">
     389                        <RemoteDir>res\drawable-hdpi</RemoteDir>
     390                        <Operation>1</Operation>
     391                    </Platform>
     392                </DeployClass>
     393                <DeployClass Name="AndroidGDBServer">
     394                    <Platform Name="Android">
     395                        <RemoteDir>library\lib\armeabi-v7a</RemoteDir>
     396                        <Operation>1</Operation>
     397                    </Platform>
     398                </DeployClass>
     399                <DeployClass Name="ProjectOSXInfoPList">
     400                    <Platform Name="OSX32">
     401                        <RemoteDir>Contents</RemoteDir>
     402                        <Operation>1</Operation>
     403                    </Platform>
     404                </DeployClass>
     405                <DeployClass Name="ProjectOSXEntitlements">
     406                    <Platform Name="OSX32">
     407                        <RemoteDir>../</RemoteDir>
     408                        <Operation>1</Operation>
     409                    </Platform>
     410                </DeployClass>
     411                <DeployClass Name="iPad_Launch2048">
     412                    <Platform Name="iOSSimulator">
     413                        <Operation>1</Operation>
     414                    </Platform>
     415                    <Platform Name="iOSDevice64">
     416                        <Operation>1</Operation>
     417                    </Platform>
     418                    <Platform Name="iOSDevice32">
     419                        <Operation>1</Operation>
     420                    </Platform>
     421                </DeployClass>
     422                <DeployClass Name="AndroidSplashStyles">
     423                    <Platform Name="Android">
     424                        <RemoteDir>res\values</RemoteDir>
     425                        <Operation>1</Operation>
     426                    </Platform>
     427                </DeployClass>
     428                <DeployClass Name="Android_SplashImage426">
     429                    <Platform Name="Android">
     430                        <RemoteDir>res\drawable-small</RemoteDir>
     431                        <Operation>1</Operation>
     432                    </Platform>
     433                </DeployClass>
     434                <DeployClass Name="AndroidSplashImageDef">
     435                    <Platform Name="Android">
     436                        <RemoteDir>res\drawable</RemoteDir>
     437                        <Operation>1</Operation>
     438                    </Platform>
     439                </DeployClass>
     440                <DeployClass Name="ProjectiOSResource">
     441                    <Platform Name="iOSSimulator">
     442                        <Operation>1</Operation>
     443                    </Platform>
     444                    <Platform Name="iOSDevice64">
     445                        <Operation>1</Operation>
     446                    </Platform>
     447                    <Platform Name="iOSDevice32">
     448                        <Operation>1</Operation>
     449                    </Platform>
     450                </DeployClass>
     451                <DeployClass Name="ProjectAndroidManifest">
     452                    <Platform Name="Android">
     453                        <Operation>1</Operation>
     454                    </Platform>
     455                </DeployClass>
     456                <DeployClass Name="Android_DefaultAppIcon">
     457                    <Platform Name="Android">
     458                        <RemoteDir>res\drawable</RemoteDir>
     459                        <Operation>1</Operation>
     460                    </Platform>
     461                </DeployClass>
     462                <DeployClass Name="File">
     463                    <Platform Name="Win32">
     464                        <Operation>0</Operation>
     465                    </Platform>
     466                    <Platform Name="iOSDevice64">
     467                        <Operation>0</Operation>
     468                    </Platform>
     469                    <Platform Name="OSX32">
     470                        <RemoteDir>Contents\Resources\StartUp\</RemoteDir>
     471                        <Operation>0</Operation>
     472                    </Platform>
     473                    <Platform Name="iOSDevice32">
     474                        <Operation>0</Operation>
     475                    </Platform>
     476                    <Platform Name="Android">
     477                        <Operation>0</Operation>
     478                    </Platform>
     479                    <Platform Name="iOSSimulator">
     480                        <Operation>0</Operation>
     481                    </Platform>
     482                </DeployClass>
     483                <DeployClass Name="AndroidServiceOutput">
     484                    <Platform Name="Android">
     485                        <RemoteDir>library\lib\armeabi-v7a</RemoteDir>
     486                        <Operation>1</Operation>
     487                    </Platform>
     488                </DeployClass>
     489                <DeployClass Required="true" Name="DependencyPackage">
     490                    <Platform Name="Win32">
     491                        <Operation>0</Operation>
     492                        <Extensions>.bpl</Extensions>
     493                    </Platform>
     494                    <Platform Name="iOSDevice64">
     495                        <Operation>1</Operation>
     496                        <Extensions>.dylib</Extensions>
     497                    </Platform>
     498                    <Platform Name="OSX32">
     499                        <RemoteDir>Contents\MacOS</RemoteDir>
     500                        <Operation>1</Operation>
     501                        <Extensions>.dylib</Extensions>
     502                    </Platform>
     503                    <Platform Name="iOSDevice32">
     504                        <Operation>1</Operation>
     505                        <Extensions>.dylib</Extensions>
     506                    </Platform>
     507                    <Platform Name="iOSSimulator">
     508                        <Operation>1</Operation>
     509                        <Extensions>.dylib</Extensions>
     510                    </Platform>
     511                </DeployClass>
     512                <DeployClass Name="Android_LauncherIcon48">
     513                    <Platform Name="Android">
     514                        <RemoteDir>res\drawable-mdpi</RemoteDir>
     515                        <Operation>1</Operation>
     516                    </Platform>
     517                </DeployClass>
     518                <DeployClass Name="Android_SplashImage960">
     519                    <Platform Name="Android">
     520                        <RemoteDir>res\drawable-xlarge</RemoteDir>
     521                        <Operation>1</Operation>
     522                    </Platform>
     523                </DeployClass>
     524                <DeployClass Name="Android_LauncherIcon36">
     525                    <Platform Name="Android">
     526                        <RemoteDir>res\drawable-ldpi</RemoteDir>
     527                        <Operation>1</Operation>
     528                    </Platform>
     529                </DeployClass>
     530                <DeployClass Name="ProjectiOSDeviceResourceRules">
     531                    <Platform Name="iOSDevice64">
     532                        <Operation>1</Operation>
     533                    </Platform>
     534                    <Platform Name="iOSDevice32">
     535                        <Operation>1</Operation>
     536                    </Platform>
     537                </DeployClass>
     538                <ProjectRoot Platform="iOSDevice64" Name="$(PROJECTNAME).app"/>
     539                <ProjectRoot Platform="Win64" Name="$(PROJECTNAME)"/>
     540                <ProjectRoot Platform="iOSDevice32" Name="$(PROJECTNAME).app"/>
     541                <ProjectRoot Platform="Win32" Name="$(PROJECTNAME)"/>
     542                <ProjectRoot Platform="OSX32" Name="$(PROJECTNAME).app"/>
     543                <ProjectRoot Platform="Android" Name="$(PROJECTNAME)"/>
     544                <ProjectRoot Platform="iOSSimulator" Name="$(PROJECTNAME).app"/>
     545            </Deployment>
    162546            <Platforms>
    163547                <Platform value="Win32">True</Platform>
    164                 <Platform value="Win64">False</Platform>
    165548            </Platforms>
    166549            <ModelSupport>False</ModelSupport>
    … …  
    170553    <Import Project="$(BDS)\Bin\CodeGear.Delphi.Targets" Condition="Exists('$(BDS)\Bin\CodeGear.Delphi.Targets')"/>
    171554    <Import Project="$(APPDATA)\Embarcadero\$(BDSAPPDATABASEDIR)\$(PRODUCTVERSION)\UserTools.proj" Condition="Exists('$(APPDATA)\Embarcadero\$(BDSAPPDATABASEDIR)\$(PRODUCTVERSION)\UserTools.proj')"/>
     555    <Import Project="$(MSBuildProjectName).deployproj" Condition="Exists('$(MSBuildProjectName).deployproj')"/>
    172556</Project>

  • os/trunk/lddesktop.dproj.local

    r5 r13  
    22<BorlandProject>
    33        <Transactions>
    4     <Transaction>2013/05/05 12:48:11.000.546,C:\Projekty\LibreDevelop\Desktop\UFormMain.dfm=C:\Users\george\Documents\RAD Studio\Projects\Unit1.dfm</Transaction>
    5     <Transaction>2013/05/05 12:48:16.000.408,C:\Projekty\LibreDevelop\Desktop\lddesktop.dproj=C:\Users\george\Documents\RAD Studio\Projects\Project1.dproj</Transaction>
    6     <Transaction>2013/05/05 14:41:42.000.034,C:\Projekty\LibreDevelop\Desktop\UDesktopVCL.pas=C:\Projekty\LibreDevelop\Desktop\DesktopVCL.pas</Transaction>
    7     <Transaction>2013/05/05 16:31:04.000.703,C:\Projekty\LibreDevelop\Desktop\Xvcl.Graphics.dproj=C:\Projekty\LibreDevelop\Desktop\lddesktop.dproj</Transaction>
    8     <Transaction>2013/05/05 16:31:23.000.727,C:\Projekty\LibreDevelop\Desktop\lddektop.dproj=C:\Projekty\LibreDevelop\Desktop\Xvcl.Graphics.dproj</Transaction>
    9     <Transaction>2013/05/05 16:31:30.000.009,C:\Projekty\LibreDevelop\Desktop\lddesktop.pas=C:\Projekty\LibreDevelop\Desktop\UCommon.pas</Transaction>
    10     <Transaction>2013/05/05 16:32:07.000.379,C:\Projekty\LibreDevelop\Desktop\Xvcl.Controls.pas=C:\Projekty\LibreDevelop\Desktop\lddesktop.pas</Transaction>
    11     <Transaction>2013/05/05 17:10:43.000.905,C:\Projekty\LibreDevelop\Desktop\Xvcl.Kernel.pas=C:\Projekty\LibreDevelop\Desktop\Xvcl.Desktop.pas</Transaction>
    12     <Transaction>2013/05/05 17:28:07.000.437,C:\Projekty\LibreDevelop\Desktop\Applications\TestApplication.pas=C:\Projekty\LibreDevelop\Desktop\UDesktopVCL.pas</Transaction>
    13     <Transaction>2013/05/05 21:35:35.000.035,C:\Projekty\LibreDevelop\Desktop\lddesktop.dproj=C:\Projekty\LibreDevelop\Desktop\lddektop.dproj</Transaction>
     4    <Transaction>2013.05.05 12:48:11.000.546,C:\Users\george\Documents\RAD Studio\Projects\Unit1.dfm=C:\Projekty\LibreDevelop\Desktop\UFormMain.dfm</Transaction>
     5    <Transaction>2013.05.05 12:48:16.000.408,C:\Users\george\Documents\RAD Studio\Projects\Project1.dproj=C:\Projekty\LibreDevelop\Desktop\lddesktop.dproj</Transaction>
     6    <Transaction>2013.05.05 14:41:42.000.034,C:\Projekty\LibreDevelop\Desktop\DesktopVCL.pas=C:\Projekty\LibreDevelop\Desktop\UDesktopVCL.pas</Transaction>
     7    <Transaction>2013.05.05 16:31:04.000.703,C:\Projekty\LibreDevelop\Desktop\lddesktop.dproj=C:\Projekty\LibreDevelop\Desktop\Xvcl.Graphics.dproj</Transaction>
     8    <Transaction>2013.05.05 16:31:23.000.727,C:\Projekty\LibreDevelop\Desktop\Xvcl.Graphics.dproj=C:\Projekty\LibreDevelop\Desktop\lddektop.dproj</Transaction>
     9    <Transaction>2013.05.05 16:31:30.000.009,C:\Projekty\LibreDevelop\Desktop\UCommon.pas=C:\Projekty\LibreDevelop\Desktop\lddesktop.pas</Transaction>
     10    <Transaction>2013.05.05 16:32:07.000.379,C:\Projekty\LibreDevelop\Desktop\lddesktop.pas=C:\Projekty\LibreDevelop\Desktop\Xvcl.Controls.pas</Transaction>
     11    <Transaction>2013.05.05 17:10:43.000.905,C:\Projekty\LibreDevelop\Desktop\Xvcl.Desktop.pas=C:\Projekty\LibreDevelop\Desktop\Xvcl.Kernel.pas</Transaction>
     12    <Transaction>2013.05.05 17:28:07.000.437,C:\Projekty\LibreDevelop\Desktop\UDesktopVCL.pas=C:\Projekty\LibreDevelop\Desktop\Applications\TestApplication.pas</Transaction>
     13    <Transaction>2013.05.05 21:35:35.000.035,C:\Projekty\LibreDevelop\Desktop\lddektop.dproj=C:\Projekty\LibreDevelop\Desktop\lddesktop.dproj</Transaction>
    1414  </Transactions>
    1515</BorlandProject>
Note: See TracChangeset for help on using the changeset viewer.