Subclass existing visual control ?
lazarus / 43-Android

----------------------------------------------------------------------
jsuzineau · 2022-06-09 14:31

Hello,
Is it possible to subclass an existing LAMW Visual Control ?
For example something like :
Code: Pascal  [Select][+][-]window.onload = function(){var x1 =
document.getElementById("main_content_section"); if (x1) { var x =
document.getElementsByClassName("geshi");for (var i = 0; i type 
TSomething = class(jEditText)  // Propriété Field  private    FField:
String;  published    property Field: String read FField write
FField;  end; 
After creating such kind of component, I can rebuild Lazarus .
But when I hit F12 to show a form which uses this component, Lazarus
freezes.
And if I try to build the project, I get an an error on linking.

I also tried to copy and paste the whole code of jEditText
(duplicating and modifying jEditText.create, jEditText.native,
jEditText.java) but I got the same behaviour.

I didn't got this kind of problem when I added another component for
android.media.AudioTrack.

My main goal is to make a LAMW version based on JEditText of a
"desktop" control based on TEdit for my ORM.
I've already made an attempt in 2017, but I'm not sure it was working,
and LAMW has changed since.

lamw version: https://github.com/jsuzineau/pascal_o_r_mapping/blob/Tjs
DataContexte/pascal_o_r_mapping/09_Controls_LAMW/ucjChamp_Edit.pas
desktop version:  https://github.com/jsuzineau/pascal_o_r_mapping/blob
/TjsDataContexte/pascal_o_r_mapping/05_Controls/ucChamp_Edit.pas

----------------------------------------------------------------------
jmpessoa · 2022-06-09 21:33

QuoteIs it possible to subclass an existing LAMW Visual Control ?

not so easily .... but you can easily create your new component!

----------------------------------------------------------------------
jsuzineau · 2022-06-10 06:25

Thank you very much for the answer.

So I've made a handler component which connects to jEditText "from the
outside", it works:
Code: Pascal  [Select][+][-]window.onload = function(){var x1 =
document.getElementById("main_content_section"); if (x1) { var x =
document.getElementsByClassName("geshi");for (var i = 0; i
 ThSomething =  class( TComponent)  //EditText  private    Fet:
jEditText;    procedure Setet( _Value: jEditText);  published   
property et: jEditText read Fet write Setet; // Propriété Field 
private    FField: String;  published    property Field: String read
FField write FField;  end;