Discussion :

[SergioMaster]

Bonjour,

Presque tout est dans le titre, quoique cela nécessite un peu d'explications.

J'ai écrit un composant TDiode (sans prétention et à retrouver pour l'instant dans un de mes dépôts Github), rédigé avec la version 11 j'ai voulu vérifié que celui-ci pouvait être rétro-compatible. La version Sidney 10.4.2 ne m'a pas posé de souci particulier mais sous 10.3 (j'étais au courant de certains problèmes concernant les gradients)
la diode n'était pas "réactive" aux changements de position du centre du gradient.




Pour que la diode réagisse il m'a fallu indiquer dans le forme principale :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
initialization
 GlobalUseGPUCanvas :=true;

Donc pour revenir à ma question :
Puis-je mettre cette instruction ailleurs, par exemple au niveau du composant et quelle incidence sur les autres OS (certainement aucune mais chat échaudé ...)

restera juste un petit problème Androïd

oui, je sais le gradient est moche mais c'est pour bien voir le point central du gradient qui devrait être de la couleur de fin (ici noir) qui est blanc. Je ne sais si c'est dû à mon vieux mobile à l'écran de faible résolution ou à un bogue ?

Bien sûr, ce composant est non testé sur les OS à la pomme (des volontaires ?) et je n'ai (cela va venir) testé sous Linux

[SergioMaster]

je n'ai (cela va venir) testé sous Linux

Dans la foulée, puisque j'étais sous rio, (je n'ai installé que le paserver de cette version sous wsl)



Pas de réactivité au déplacement du centre du gradient ce qui réponds (en partie) à la question, sans toutefois me donner de solution

quelle incidence sur les autres OS ?

Après installation de paserver_22 (donc version Alexandria) même constatation



Tout fonctionne, sauf le déplacement du centre du gradient

[pprem]

Bonjour Serge

Pour le GPU, c'est censé paramétrer l'affichage lors des appels aux librairies graphiques qui le prennent en charge sous réserve qu'un GPU soit présent sur l'appareil. Théoriquement c'est à activer avant de faire quoi que ce soit, donc initialization d'une unité est l'idéal.

En pratique je ne sais pas si le mettre ailleurs a un impact, ça doit dépendre de la librairie graphique sous-jacente et donc de la plateforme. Comme pour l'activation de Metal sur Mac.

[SergioMaster]

Bonjour Patrick,

Oui, je me doutais bien d'un truc comme ça. Cela dit si on parle windows c'est simplement un problème de version de Delphi, pour la 10.4 et 11 ça fonctionne sans (il va falloir que je teste Tokyo pour affirmation)

C'est Linux qui me gêne maintenant, cela dit c'était un test rapide via WSL donc peut-être pas fiable 100%.
Autre sujet Linux, je viens de me rendre compte que TPath n'était pas pris en charge là je suis surpris ! L'unité FXM.Objects n'indique rien en ce sens, il va falloir que je regarde côté enregistrement des composants pour vérifier si ce n'est pas une simple erreur/oubli

[pprem]

Bonjour Patrick,

Oui, je me doutais bien d'un truc comme ça. Cela dit si on parle windows c'est simplement un problème de version de Delphi, pour la 10.4 et 11 ça fonctionne sans (il va falloir que je teste Tokyo pour affirmation)

C'est Linux qui me gêne maintenant, cela dit c'était un test rapide via WSL donc peut-être pas fiable 100%.
Autre sujet Linux, je viens de me rendre compte que TPath n'était pas pris en charge là je suis surpris ! L'unité FXM.Objects n'indique rien en ce sens, il va falloir que je regarde côté enregistrement des composants pour vérifier si ce n'est pas une simple erreur/oubli

TPath absent sur Linux ? Bizarre. Va falloir que je dépoussière une de mes VM Ubuntu pour checker ça car il n'y a aucune raison à ça vu le fonctionnement de ce composant.

[SergioMaster]

Pas besoin de dépoussiérer une VM.
Je ne comprends pas mon problème (un peu comme mon problème TMenu qui me pouuri la vie sur une application)
si j'écris un nouveau programme, dans un nouveau groupe de projet, je n'ai pas ce souci.
C'est étrange ça, encore un mystère de chargement ?

[HTML-Dev]

Bonjour Serge,

j'ai testé ta diode sur une 10.4. RAS.
Lorsque je vois des composants "individuels", j'examine systématiquement les dpk, dproj... d'où ma question :

• Le Lug.FMX.Diode.dproj est-il le résultat "automatique" de l'IDE ou l'as tu modifié manuellement ?

Merci. Cordialement. Gilles

[SergioMaster]

Bonjour,

Le Lug.FMX.Diode.dproj est-il le résultat "automatique" de l'IDE ou l'as tu modifié manuellement ?

Je ne pense pas avoir modifié quoi que ce soit donc, je dirais le résultat "automatique"
mais il faudrait que je regarde plus en détail, est-ce que l'ajout de ressource modifie le dproj

Merci d'avoir testé avec la 10.4 (ce que j'avais fait également mais 2 avis valent mieux qu'un), cela m'indique au moins qu'il y a tout ce qu'il faut dans le zip.

Ce que je n'ai pas testé se situe plus dans la zone des pommiers (OSX, IOS) et Linux (l'expérience WSL indique une malfonction des modifications de position du centre du gradient)
Côté Android c'est plus correct si ce n'est ce point blanc mais c'est peut-être du à un mobile que beaucoup considérerait comme obsolète, un Lenny 3 de 2016 n'est peut-être pas le meilleur appareil pour tester (c'est pour cela que je n'ai pas ouvert de RSP sur le portail qualité)

P.S. Toute critique sur le PDF sera la bienvenue

[pprem]

Pas besoin de dépoussiérer une VM.

si, si, de toute façon faut que je m'en occupe au moins pour mes autres choses en cours

je tente de regarder tout à l'heure après avoir bouclé mon article pour le prochain Programmez! et m'être rebadigeonné de Biafine (sorti hier, y avait du soleil, j'ai encore cramé, autant dire que pas de stream avant ce week-end )

[SergioMaster]

Bon, ça se confirme, j'incriminai WSL mais sous une machine Ubuntu, même phénomène, le centre du gradient ne se déplace pas



Toute idée sera bienvenue, un globaluse quelque chose ?

[Gouyon]

Effectivement j'ai eu ce problème avec la 10.3. Il semble avoir disparu avec la 10.4 (et+)
Voici comment moi j'ai codé le gradient de couleur:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
 
procedure TLed.Paint;
var
  rayon: Single;
  rect: TRectF;
begin
  rayon := Width;
  if Height < rayon then
    rayon := Height;
  rayon := rayon / 2;
  Canvas.BeginScene;
  Canvas.Stroke.Thickness := rayon / 10;
  Fill.Kind := TBrushKind.Gradient;
  Fill.Gradient.Style := TGradientStyle.Radial;
  if ledON then
  begin
    Fill.Gradient.Color := setCoul(CouleurON);
  end
  else
    Fill.Gradient.Color := claGray;
  Fill.Gradient.Color1 := claWhite;
  Fill.Gradient.RadialTransform.RotationCenter.X := 0.7;
  Fill.Gradient.RadialTransform.RotationCenter.Y := 0.2;
  rect.Left := Width / 2 - rayon;
  rect.Right := Width / 2 + rayon;
  rect.Top := Height / 2 - rayon;
  rect.Bottom := Height / 2 + rayon;
 
  Canvas.FillEllipse(rect, 1, Fill);
  Canvas.DrawEllipse(rect, 1);
  Canvas.EndScene;
end;

Si ça peut aider.

[SergioMaster]

Bonjour Rémy,

C'est codé à peu près pareil, sauf que je n'utilise aucun canvas.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
 
constructor TDiode.Create(AOwner: TComponent);
  begin
    if not(csloading in ComponentState) then
    begin
      inherited;
      FOnOff:=True;
      FColorOff:=TAlphaColors.Lightgray;
      FColorOn:=TAlphaColors.Red;
      FBrightPos:=TPosition.Create(PointF(0.5,0.5));
      FBrightPos.OnChange:=ChangeBrightPos;
      FBrightColor:=TAlphaColors.Antiquewhite;
      Fill.DefaultColor:=FColorOn;
      Fill.Color:=FColorOn;
      Fill.Gradient.Color:=FColorOn;
      Fill.Gradient.Color1:=FBrightColor;
      Fill.Kind:=TBrushKind.Gradient;
      Fill.Gradient.Style:=TGradientStyle.Radial;
      Fill.Gradient.RadialTransform.RotationCenter.X :=FBrightPos.X;
      Fill.Gradient.RadialTransform.RotationCenter.Y :=FBrightPos.Y;
      Paint;
    end;
  end;
 
 
 function TDiode.Paint: Boolean;
  begin
  if FonOff then Fill.Gradient.Color:=FColorOn
            else Fill.Gradient.Color:=FColorOff;
  Fill.Gradient.Color1:=FBrightColor;
  Fill.Gradient.RadialTransform.RotationCenter.X:=FBrightPos.X;
  Fill.Gradient.RadialTransform.RotationCenter.Y:=FBrightPos.Y;
  Result:=True;
  end;

Et, oui avec les 10.4 et plus le problème n'esiste plus.
D'ailleurs je n'ai toujours pas compris pourquoi tu utilisais une Ellipse, sauf à me reporté a un ancien bogue, de XE4 je crois.

Mais as-tu essayé sous d'autres OS que windows (le cas Linux me gêne vraiment, Andoid moins) ?

[gbegreg]

Bonjour,

Pour info, je place les variables GlobalUseXXXXX dans les sources du projet avant l'instruction Application.Initialize;.

Exemple issu de mon article paru dans le n° 247 du magazine Programmez! (juillet/aout 2021) pour activer Metal lorsqu'on compile pour Mac OS :
https://github.com/gbegreg/Delphier/...n/Delphier.dpr

[Gouyon]

D'ailleurs je n'ai toujours pas compris pourquoi tu utilisais une Ellipse, sauf à me reporté a un ancien bogue, de XE4 je crois.

C'est tout simplement parce que j'ai dérivé tous mes composant d'un TRectangle du coup je dessine une ellipse.

Mais as-tu essayé sous d'autres OS que windows (le cas Linux me gêne vraiment, Andoid moins) ?

Non pour l'instant je n'ai fait que du Windows car les composants que j'ai développé étaient destiné à l'origine à une application windows

[SergioMaster]

SKIA4Delphi, après plusieurs webinaires, il me semblait que cela valait le coup de tenter son utilisation dans le cadre de ce test et j'ai bien fait !
J'étais parti sur un galère de double buffer (à l'instar de la bibliothèque Alcinoe) ou de TLayoutBuffer (non compilable pour Linux )

Après quelques petites séances de galère pour découvrir comment déployer pour android, c'est simple (ajout de 2 unités skia, skia.FMX et de l'instruction GlobalUseSkia:=true;)
ça fonctionne parfaitement pour Android , plus de point blanc

Je vais reprendre les rames pour tester en Linux.

Restera une question en suspend dans le cas où cela fonctionnerait : comment intégrer cela à l'unité des composants ou, en gros, comment signaler quand on pose le composant sur la fiche que l'ajout de Skia (si installé) serait nécessaire

[pprem]

Restera une question en suspend dans le cas où cela fonctionnerait : comment intégrer cela à l'unité des composants ou, en gros, comment signaler quand on pose le composant sur la fiche que l'ajout de Skia (si installé) serait nécessaire

Andrea Magni a commencé à l'intégrer à ses librairies. Je n'ai pas encore regardé comment, mais tu trouveras sans doute de quoi t'inspirer sur https://github.com/andrea-magni/FMXER

[SergioMaster]

Pour Linux je n'y arrive pas
je ne sais si c'est dû à une lib manquante, le déploiement ou autre chose, même la démo me fourni l'erreur suivante



Comme, sans Skia mon déploiement fonctionne j'en déduis qu'il y a quelque chose que j'oublie

[Paul TOTH]

il faudrait déployer le ">" dans ton message pour savoir de quoi il est question

ensuite pour ceux qui ont connu Kylix, il était plus simple, car il produisait un exécutable coute que coute comme sous Windows...avec la version moderne on est plus proche d'un compilateur façon C++ (ou gcc) qui réclame les lib dont il dépend...c'est un peu pénible mais il parait que c'est nécessaire pour l'éditeur de lien. Donc sur ton Linux il faut installer les packages "dev" correspondant aux lib que tu utilises, et ensuite mettre à jour le SDK de Delphi qui va récupérer tout cela sous Windows pour la compilation.

[SergioMaster]

il faudrait déployer le ">" dans ton message pour savoir de quoi il est question

Ah, désolé, quand j'ai pris la capture je n'y ai pas pensé
Bon en fait il s'agissait (probablement) d'une lib manquante sudo apt-get install zlib1g-dev que j'ai installé.
Plus d'erreur de déploiement, mais pas d'exécution j'en suis au même stade donc ou presque.

[Paul TOTH]

attention avec FMXLinux j'ai rencontré un problème de debug, dès le lancement, l'appli plante avec un Range check error, il faut désactiver l'option pour que ça fonctionne