Report with wince (arm)
lazarus / 5-Lazarus Extra Components

----------------------------------------------------------------------
itcsis · 2012-01-02 09:33

I’m development a program in delphi, and a module in lazarus for wince
(arm) for a pda. All is fine, but I can’t print a report with the pda
with a bluetooth printer. LazReport don’t works in wince.

I’ve tried with createfile to com port, but don’t work.

Somebody Have some idea or documentation.

----------------------------------------------------------------------
felipemdc · 2012-01-02 09:49

Does printing in general without LazReport work for you? (see
http://wiki.lazarus.freepascal.org/Using_the_printer#The_Basic_Steps)

Which Lazarus version are you using?

Which exact code you tried with CreateFile?

----------------------------------------------------------------------
itcsis · 2012-01-02 10:26

The Lazarus version is 0.9.28.2.beta (i tried with the 0.9.31 version
but i uninstalled after)

Then code for createfile is (show CreateFile Error):

var
  hComm    : THandle;
  Cadena,
  CommPort : String;
  lrc      :LongWord;
  Seguridad : TSecurityAttributes;
  {$IFDEF Win32}
  SAnsi:AnsiString;
  Port:LPCSTR;
  {$ENDIF}
  {$IFDEF WinCE}
  SWide:WideString;
  Port:LPCWSTR;
  {$ENDIF}
begin
  CommPort := 'COM'+IntToStr(SpinEdit1.Value);
  {$IFDEF Win32}
  SAnsi:=CommPort;
  Port:=PChar(SAnsi);
  hComm := CreateFile( PChar(Port), GENERIC_WRITE, 0, nil{LPA},
OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, 0);
  {$ENDIF}
  {$IFDEF WinCE}
  SWide:=CommPort;
  Port:=PWideChar(SWide);
  hComm := CreateFile( PWideChar(Port), GENERIC_WRITE, 0, nil{LPA},
OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, 0);
  {$ENDIF}
  if (hComm = INVALID_HANDLE_VALUE) then begin
    ShowMessage('CreateFile Error!');
    exit;
  end;
  Cadena := 'Hola';
  WriteFile( hComm,Cadena,Length(Cadena), lrc, nil);
  CloseHandle(hComm);

----------------------------------------------------------------------
felipemdc · 2012-01-03 00:11

The answer to my first question ("Does printing in general without
LazReport work for you?") is quite important.

----------------------------------------------------------------------
itcsis · 2012-01-03 10:41

I can't print anyway with wince. I don't mind the way for print.

if i use lazreport then not compile in wince. If i used createfile
give me an error. I've got a bluetooh matrix printer.