Discussion :

[remixtech]

Bonjour,

Je n'ai pas de problème, c'est juste une question que je me pose :

Je déclare :

Code :

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

1
2
3
4
5
var trans: tbuffercoord;
...
trans.Char := 1;
trans.line := FLineNo + 1;
FEditor.BlockBegin := trans;

Sachant que

Code :

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

1
2
3
4
  TBufferCoord = record
    Char: integer;
    Line: integer;
  end;

Suis je vraiment obliger d'utiliser cette variable trans ?

Pareil pour ici :

Code :

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

1
2
3
4
5
6
7
var trans: tdisplaycoord;
begin
   if FEditor.SelAvail then
   begin
      trans.Column := feditor.BlockBegin.Char;
      trans.Row := feditor.BlockBegin.line;
      SelectionPosition.TopLeft := FEditor.RowColumnToPixels(trans);

C'est un peu lourd vous ne trouvez n'y a t'il pas moyen de simplifier ?
Cordialement,
Et merci d'avance

[Clorish]

mis a part creer une fonction qui retourne un Tbuffercoord en fonction de 2 parametre char et line comme le font les methodes Rect et Point je ne voit pas d'autre solutions ...

Du moins tant que ta fonction RowColumnToPixels requierera ce type de parametre, qu'il faudra bien d'une maniere ou d'une autre remplir.

[sjrd]

Pareil pour ici :

Code :

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

1
2
3
4
5
6
7
var trans: tdisplaycoord;
begin
   if FEditor.SelAvail then
   begin
      trans.Column := feditor.BlockBegin.Char;
      trans.Row := feditor.BlockBegin.line;
      SelectionPosition.TopLeft := FEditor.RowColumnToPixels(trans);

Là ça dépend. Si TDisplayCoord est défini comme ça :

Code :

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

1
2
3
4
5
type
  TDisplayCoord = record
    Column : integer;
    Row : integer;
  end;

Tu peux faire un transtypage directement :

Code :

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

1
2
3
if FEditor.SelAvail then
  SectionPosition.TopLeft :=
    FEditor.RowColumnToPixels(TDisplayCoord(FEditor.BlockBegin));

[Laurent Dardenne]

Salut Remixtech,
pour info les liens dans ta signature sont hs.

Si c'est pas indiscret qu'en est-il de ton très bon soft de gestion mail ?

ps:
Ta boîte à MP sur ce site est full

[remixtech]

Merci bien en effet ma boite était full je vais la nettoyer
Pour le client mail, j'en fait un nouveau avec le recul de l'âge et de la maturité, rendez vous dans quelques mois