Felipe Monteiro de Carvalho wrote:
> On Thu, Sep 11, 2008 at 2:58 PM, Dimitrios Chr. Ioannidis
> <[EMAIL PROTECTED]> wrote:
>   
>> It works. Thx ... Now i can help you more providing you with debug
>> output info's like this, where i'm trying to see why ApplicationType
>> isn't set correctly in my device :
>>     
>
> Why do you think it isn't set correctly? What is it set to? What were
> you expecting?
>   

Well, i was expecting that the ApplicationType variable to be set to 
atPDA or to atHandheld regarding the device that is running. At least 
this was my assuption reading the code below :

( winceobject.inc )
...
128:  { Initializes the application type }
129:   if Application.ApplicationType = atDefault then
130:     Application.ApplicationType := GetWinCEPlatform;
...


but then when i trace the GetWinCEPlatform call i find that it ends in ( 
intfbasewinapi.inc )

function TWidgetSet.SystemParametersInfo(uiAction: DWord; uiParam: 
DWord; pvParam: Pointer; fWinIni: DWord): LongBool;
begin
  case uiAction of
    SPI_GETWHEELSCROLLLINES: PDword(pvPAram)^ := 3; // default value
  else
    Result := False;
  end
end;

which does nothing. If i'm not mistaken the implementation code to auto 
determine the device type and set the applicationtype variable 
accordingly is missing.

Maybe i'm wrong, i'm just started to learn LCL.

regards,

-- 
Dimitrios Chr. Ioannidis

_______________________________________________
Lazarus mailing list
[email protected]
http://www.lazarus.freepascal.org/mailman/listinfo/lazarus

Reply via email to