New version of BGRABitmap

[VTwin]

Oh I may have forgotten something.

Would it fix the problem to replace "BGRADefaultBitmap" by "BGRALCLBitmap", and "TBGRADefaultBitmap" by "TBGRALCLBitmap" in BGRABitmap.pas ?

Yes indeed circular, that fixed the problem! Many thanks.

BGRABitmap is fantastic, thanks for all your work on this.

P.S. Maybe we will see the day when BGRAControls will be a complete widget set for Lazarus? 

Cheers,
VTwin

[circular]

Is LazUtils absolutely necessary, does it not exist something else more flexible  ?

It is necessary to render FreeType fonts.

Maybe it is because i use last fpc 3.0.1 ?

Yep, with fpc 2.4 it works 

I am interested if you have an idea on how to make it work with both compilers. What function has changed?

Huh, Circular, what a perfect work you have done. 

It works perfectly and it is pure-fpGUI => incredible.   

Thanks. 

Where are you with your plan to do a BGRABitmap library ?
If you agree, it will be a pleasure to help you for that.

Of course, you are welcome to help. I am writing the documentation. Basically the tasks consists in adding comments in the source code. Then this is transformed into a beautiful wiki. Would you like to hear more about this task?

BGRABitmap is fantastic, thanks for all your work on this.

You're welcome.

P.S. Maybe we will see the day when BGRAControls will be a complete widget set for Lazarus? 

Ahah maybe. 

To be honest I have no idea how to do that.

[Graeme]

To be honest I have no idea how to do that.

Leave that to me!  I'll make it happen with fpGUI Toolkit, or at least try and make it so the software renderer for fpGUI is configurable at compile time between AggPas and BGRABitmap. If I complete one, the other shouldn't be too difficult to add. [last famous worlds]

Regards,
  Graeme

[circular]

Ok Graeme. 

So it would be possible to customize the appearance of controls with fpGUI? Or do you think about compiling the current BGRAControls with fpGUI?

[Fred vS]

I am interested if you have an idea on how to make it work with both compilers. What function has changed?

=>
paswstring.pas(379,43) Error: Incompatible types: got "<address of procedure(PWideChar;var AnsiString;Int64);Register>" expected "TUnicodeStringManager.<procedure variable type of procedure(PWideChar;var RawByteString;Word;Int64);Register>"

Quote

    Where are you with your plan to do a BGRABitmap library ?
    If you agree, it will be a pleasure to help you for that.

Of course, you are welcome to help. I am writing the documentation. Basically the tasks consists in adding comments in the source code. Then this is transformed into a beautiful wiki. Would you like to hear more about this task?

Hum, i was taking to transform BGRABitmap unit into a library...

Like i did for fpGUIlib => https://github.com/fredvs/fpGUIlib
or uoslib => https://github.com/fredvs/uoslib

Fre;D

[circular]

I am interested if you have an idea on how to make it work with both compilers. What function has changed?

=>
paswstring.pas(379,43) Error: Incompatible types: got "<address of procedure(PWideChar;var AnsiString;Int64);Register>" expected "TUnicodeStringManager.<procedure variable type of procedure(PWideChar;var RawByteString;Word;Int64);Register>"

Yes I saw that in your previous response, but that does not give me a name. Hmm, oh I see, it is a unit in LazUtils. I suppose it is about Ansi2WideMoveProc or Wide2AnsiMoveProc.

Anyway it will probably be updated by someone in the LCL team for future versions.

Hum, i was taking to transform BGRABitmap unit into a library...

Like i did for fpGUIlib => https://github.com/fredvs/fpGUIlib
or uoslib => https://github.com/fredvs/uoslib

Ah ok. Well I don't intend to do that for now so I don't need help there. Are you unsure that I would not authorize you to do so? Would it entail something regarding the structure of BGRABitmap?

[Fred vS]

Are you unsure that I would not authorize you to do so?

Hum, BGRABitmap is yours, i think normal to ask it to you...

Would it entail something regarding the structure of BGRABitmap?

Not the global structure but each procedure/function will be adapted if the library is classical native or Java native.

[lainz]

Are you unsure that I would not authorize you to do so?

Hum, BGRABitmap is yours, i think normal to ask it to you...

Would it entail something regarding the structure of BGRABitmap?

Not the global structure but each procedure/function will be adapted if the library is classical native or Java native.

I've started the library some time ago (with circular help), is in bgracontrols package, but left it since I will not use it as is, but if you're interested check it out.
bgracontrols\test\test_bgrabitmap_library test project
bgracontrols\bgra_pascalscript_library the library is based on the bgrabitmap pascal script implementation (that of course is limited to the declared functions in BGRAPascalScript.pas), because that is the name I choose...

I don't know if you have the ability to include the classes like in the bgrabitmap source to get the real power. And also I must ask you If you know if you can get it working with visual studio and c# for example...

[Dibo]

Just quickly made Windows 7 fpGUI style using BGRABitmap. Antyalias, effects, rounding, everything is working fine. It is amazing. Something is wrong with scrollbars but it is probably my mistake with coordinates. Draw speed seems to be faster than LCL version, probably that it omit Gtk/Qt level and draw directly on X11. Well done circular

Suggestion: Missing handy method for color convertion from TfpgColor to TBGRAPixel. For now I need to use fpgColorToRGBTriple and then its RED GREEN BLUE property in BGRA(red, green, blue)

Attached screenshot and source. Tested on Kubuntu 64 bit

[Fred vS]

Posted by: 007
I've started the library some time ago (with circular help), is in bgracontrols package, but left it since I will not use it as is, but if you're interested check it out.
bgracontrols\test\test_bgrabitmap_library test project
bgracontrols\bgra_pascalscript_library the library is based on the bgrabitmap pascal script implementation (that of course is limited to the declared functions in BGRAPascalScript.pas), because that is the name I choose...

Ha, ok, you did it like that => using Pascal Script.
I have to study it because i do that way =>

Code: [Select]

library BGRABitmap;
uses
   BGRABitmap
  ,BGRABitmapTypes;

 function getBlue(AColor: TBGRAColor): byte;  cdecl;
  begin
    Result := getBlue(aColor);
  end;

....

exports
   getBlue name 'getblue',
...
begin
end.

And also I must ask you If you know if you can get it working with visual studio and c# for example...

I am not sure to understand... but if you want to know if a fpc library could be used with other languages =>
Of course fpc libraries work with visual studio programs, Python programs, even Java programs (with some modifs).
All compiler/language that can deal with native libraries can deal with fpc libraries. 

Fre;D

[Fred vS]

And also I must ask you If you know if you can get it working with visual studio and c# for example...

Hum, i think i understand what you mean... 

If you want a Universal Library, there are some things to take care.

- do not use complicated class as parameters or result (only byte, integer, float, boolean => strings is possible but less easy)
- if complicated custom classes are needed like create a TBGRABitmap => you may use a array of TBGRABitmap declared inside the library. => so the foreign program call a procedure who will increment the array of TBGRABitmap.

Fre;D

[lainz]

Ok. Basically check my code works as you suggested in both comments. With an internal array and these kind of functions.

The code does.not need pascal script but an unit called bgrapascalscript.pas is used to reuse the code in both projects. Check it out. Maybe you want to contribute to this unit direcly we can give you svn access.

Yes, strings are objects in c#. And all unicode of 16 bits.
Edit: here it is, how to pass strings from c# to a lazarus .dll http://forum.lazarus.freepascal.org/index.php/topic,28209.0.html

The question was basically because i'm new to c#. I even did not finish reading the book from the ms website.

[circular]

Just quickly made Windows 7 fpGUI style using BGRABitmap. Antyalias, effects, rounding, everything is working fine. It is amazing. Something is wrong with scrollbars but it is probably my mistake with coordinates. Draw speed seems to be faster than LCL version, probably that it omit Gtk/Qt level and draw directly on X11. Well done circular

Wow it looks great Dibo

Suggestion: Missing handy method for color convertion from TfpgColor to TBGRAPixel. For now I need to use fpgColorToRGBTriple and then its RED GREEN BLUE property in BGRA(red, green, blue)

I suppose you can use ColorToBGRA()

[lainz]

Just quickly made Windows 7 fpGUI style using BGRABitmap. Antyalias, effects, rounding, everything is working fine. It is amazing. Something is wrong with scrollbars but it is probably my mistake with coordinates. Draw speed seems to be faster than LCL version, probably that it omit Gtk/Qt level and draw directly on X11. Well done circular

Suggestion: Missing handy method for color convertion from TfpgColor to TBGRAPixel. For now I need to use fpgColorToRGBTriple and then its RED GREEN BLUE property in BGRA(red, green, blue)

Attached screenshot and source. Tested on Kubuntu 64 bit

Please upload it to BGRA-Controls!
(Yes, I know, is full of things, but.. you know, people find all the stuff there)

[Fred vS]

@ 007

Hello.

I have checked your bgra_pascalscript_library.lpr.

Wow, perfect, nice work. 

Some little detail to be more Universal...

Maybe replace all TBGRAColor with longword => example =>

Code: [Select]

function rgb(red, green, blue: byte): longword; {$IFDEF WINDOWS}stdcall;{$ELSE}cdecl;{$ENDIF}
  begin
    Result := BGRAPascalScript.rgb(red, green, blue);
  end;                                

And replace all String with PChar => example =>

Code: [Select]

procedure bgra_SaveToFile(id: integer; filename: PChar); {$IFDEF WINDOWS}stdcall;{$ELSE}cdecl;{$ENDIF}
  begin
    BGRAPascalScript.bgra_SaveToFile(id, filename);
  end;

"_" character in exports-name is interpreted as sub-class in some language (Java,..).
Also, to avoid mangle-name   =>

Code: [Select]

exports
  bgra_GetHighestID name 'bgragethighestid',
   ...   

Fre;D