http://wiki.techtic.pro/ 2026-05-13T21:53:41+0200 http://wiki.techtic.pro/ http://wiki.techtic.pro/lib/exe/fetch.php?media=favicon.ico text/html 2022-03-27T19:19:29+0200 Anonymous (anonymous@undisclosed.example.com) http://wiki.techtic.pro/doku.php?id=prog:lazarus:functions:dialogs&rev=1648401569&do=diff Dialogs Editeur de message intégré à l'IDE On peut ouvrir l’éditeur de message avec [Ctrl+M] QuestionDlg if QuestionDlg('Suppression...', 'Confirmez la suppression de ce style', mtCustom, [mrYes, 'Oui', mrNo, 'Non', 'IsDefault'], '') = mrYes then text/html 2020-04-02T20:07:28+0200 Anonymous (anonymous@undisclosed.example.com) http://wiki.techtic.pro/doku.php?id=prog:lazarus:functions:drawtext&rev=1585850848&do=diff DrawText source : <https://docs.microsoft.com/en-us/windows/win32/api/winuser/nf-winuser-drawtext> Exemple DrawText(Canvas.Handle,PChar(vText), length(vText),vTextBox,DT_WORDBREAK or DT_INTERNAL or DT_CALCRECT); Astuces Dessiner un texte limité en largeur Appeler deux fois DrawText. Une fois avec le format DT_CALCRECT. text/html 2020-05-23T11:38:00+0200 Anonymous (anonymous@undisclosed.example.com) http://wiki.techtic.pro/doku.php?id=prog:lazarus:functions:format&rev=1590226680&do=diff Format La fonction Format('',[]) Cette fonction est une fonction super utile pour formater du texte function Format( const Fmt: String; const Args: array of Const) : String; function Format( const Fmt: String; const Args: array of Const; const FormatSettings: TFormatSettings) : String; text/html 2020-09-04T15:08:47+0200 Anonymous (anonymous@undisclosed.example.com) http://wiki.techtic.pro/doku.php?id=prog:lazarus:functions:statistques&rev=1599224927&do=diff Statistiques Unit Math * <https://www.freepascal.org/docs-html/rtl/math/statisticalroutines.html> Librairies tierces * <https://wiki.freepascal.org/LMath>