[utf8vcl-cvs] utf8vcl JVCLTest.dpr, 1.1, 1.2 TestForm.pas, 1.25, 1.26 UTF8VCLMessages.pas, 1.24, 1.25

[Bart v. d. W. <blu...@us...>]

Update of /cvsroot/utf8vcl/utf8vcl
In directory sc8-pr-cvs8.sourceforge.net:/tmp/cvs-serv21513

Modified Files:
	JVCLTest.dpr TestForm.pas UTF8VCLMessages.pas 
Log Message:
remove unused dependecy on gauges.
allways pass a buffer for some gettext stuff.


Index: JVCLTest.dpr
===================================================================
RCS file: /cvsroot/utf8vcl/utf8vcl/JVCLTest.dpr,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** JVCLTest.dpr	29 Mar 2007 11:59:37 -0000	1.1
--- JVCLTest.dpr	30 Mar 2007 22:27:22 -0000	1.2
***************
*** 2,5 ****
--- 2,6 ----
  
  uses
+   ShareMem,
    Forms,
    JVCLMainTest in 'JVCLMainTest.pas' {Form1},

Index: UTF8VCLMessages.pas
===================================================================
RCS file: /cvsroot/utf8vcl/utf8vcl/UTF8VCLMessages.pas,v
retrieving revision 1.24
retrieving revision 1.25
diff -C2 -d -r1.24 -r1.25
*** UTF8VCLMessages.pas	28 Mar 2007 18:36:04 -0000	1.24
--- UTF8VCLMessages.pas	30 Mar 2007 22:27:22 -0000	1.25
***************
*** 127,134 ****
          Assert(not SpecialWndProc(Cardinal(@Proc)));
          L := Proc(hWnd, CB_GETLBTEXTLEN, InWParam, UnusedLParam);
!         if L > 0 then
!           GetMem(Pointer(OutLParam), SizeOf(Utf8Byte) * (L + 1))
!         else
!           OutLParam := LPARAM(nil);
        end;
      EM_GETLINE:
--- 127,131 ----
          Assert(not SpecialWndProc(Cardinal(@Proc)));
          L := Proc(hWnd, CB_GETLBTEXTLEN, InWParam, UnusedLParam);
!         GetMem(Pointer(OutLParam), SizeOf(Utf8Byte) * (L + 1))
        end;
      EM_GETLINE:
***************
*** 305,312 ****
        begin
          L := CallWindowProcW(@Proc, hWnd, CB_GETLBTEXTLEN, InWParam, UnusedLParam);
!         if L > 0 then
!           GetMem(Pointer(OutLParam), SizeOf(WideChar) * (L + 1))
!         else
!           OutLParam := LPARAM(nil);
        end;
      EM_GETLINE:
--- 302,306 ----
        begin
          L := CallWindowProcW(@Proc, hWnd, CB_GETLBTEXTLEN, InWParam, UnusedLParam);
!         GetMem(Pointer(OutLParam), SizeOf(WideChar) * (L + 1))
        end;
      EM_GETLINE:

Index: TestForm.pas
===================================================================
RCS file: /cvsroot/utf8vcl/utf8vcl/TestForm.pas,v
retrieving revision 1.25
retrieving revision 1.26
diff -C2 -d -r1.25 -r1.26
*** TestForm.pas	25 Mar 2007 15:55:16 -0000	1.25
--- TestForm.pas	30 Mar 2007 22:27:22 -0000	1.26
***************
*** 12,16 ****
    Windows, SysUtils, Classes, Controls, Forms,
    Dialogs, ComCtrls, StdCtrls, Menus, Grids, ValEdit, Buttons, ExtCtrls,
!   Mask, ActnList, CheckLst, DBGrids, Gauges, ShellCtrls;
  
  type
--- 12,16 ----
    Windows, SysUtils, Classes, Controls, Forms,
    Dialogs, ComCtrls, StdCtrls, Menus, Grids, ValEdit, Buttons, ExtCtrls,
!   Mask, ActnList, CheckLst, DBGrids, ShellCtrls;
  
  type