|
|||||||
| Contribuez Proposez vos articles, cours, tutoriels, FAQ, sources et autres ressources pour la rubrique Delphi. |
![]() |
|
|
Outils de la discussion |
|
|
#1 (permalink) | |
![]() Date d'inscription: novembre 2003
Localisation: Ne'tù
Messages: 3 803
|
Bonjour,
Comme vous le savez, la FAQ Delphi contient les questions fréquemment posées sur les forums Delphi et Delphi et bases de données. Malgré nos efforts, elle peut néanmoins contenir des erreurs, nous vous remercions donc de nous les signaler si vous en trouvez. Par ailleurs, si vous avez des Questions/Réponses (QRs) intéressantes à proposer dont vous êtes l'auteur, vous pouvez les poster à la suite de ce topic en respectant le format donné ci-après. Ces questions doivent être relatives à des problèmes précis que vous avez rencontrés lors du développement de votre application ou alors une question frequemment posée sur le forum. Il vous est demandé, par conséquent, de préciser la version de Delphi, les composants que vous utilisez (éditeurs, gratuits, personnels) ainsi que la section dans laquelle vous souhaitez voir votre QR publiée. La FAQ Delphi aimerait rester la plus technique possible. Nous encourageons donc les developpeurs (débutants ou expériementés) à consulter l'aide afin d'utiliser les fonctions standards qui résolvent bien des problèmes avant de proposer une QR. Pour soumettre une QR, il vous est demandé de la présenter de cette façon : Citation:
Il est également possible d'envoyer votre QR par mail (avec éventuellement en pièces jointes les sources) à l'adresse faqdelphi _AT_ redaction-developpez.com
__________________
Comment rejoindre la rédaction de www.developpez.com ? Améliorer vos posts en faisant une correction orthographique Comment vous rendre utile sur le forum ?"Tu as tort d'abuser de ma patience" Sokar |
|
|
|
|
|
|
#2 (permalink) |
![]() Date d'inscription: novembre 2003
Localisation: Ne'tù
Messages: 3 803
|
Bonjour,
L'adresse de la FAQ est exclusivemement réservée à vos propositions pour la FAQ. Si par ailleurs, vous souhaitez rédiger un article, merci de prendre contact directement avec un des membres de l'équipe Delphi ou le DRH par MP. Par ailleurs, les questions techniques (ou non) doivent être postées sur le forum. Toute demande par mail sera purement et simplement ignorée. Merci.
__________________
Comment rejoindre la rédaction de www.developpez.com ? Améliorer vos posts en faisant une correction orthographique Comment vous rendre utile sur le forum ?"Tu as tort d'abuser de ma patience" Sokar |
|
|
|
|
|
#3 (permalink) |
![]() Date d'inscription: mars 2004
Messages: 518
|
Obtenir la largeur et/ou la hauteur en pixels d'un texte, dans une fonte donnée, et dans un contrôle fenêtré donné.
Fonctions sans instanciations d'objets VCL, donc rapides. Plateforme Windows uniquement, enfin je crois... Code :
function GetTextSize (const AControl : TWinControl; const AFont : TFont; const AText : string): TSize; var DC: HDC; begin DC := GetWindowDC(AControl.Handle); Result.cx := 0; Result.cy := 0; SelectObject(DC,AFont.Handle); GetTextExtentPoint32(DC,PChar(AText),Length(AText),Result); ReleaseDC(AControl.Handle,DC); end; function GetTextWidth (const AControl : TWinControl; const AFont : TFont; const AText : string): Integer; begin Result := GetTextSize(AControl,AFont,AText).cx end; function GetTextHeight(const AControl : TWinControl; const AFont : TFont; const AText : string): Integer; begin Result := GetTextSize(AControl,AFont,AText).cy end; |
|
|
|
|
|
#4 (permalink) |
![]() Date d'inscription: octobre 2003
Localisation: Yavin IV
Messages: 5 191
|
Super QR
![]() Merci de ta participation
__________________
Pedro Aucune réponse aux sollicitations techniques par MP Faut pas attendre d'en avoir besoin pour s'en servir... (Lucien Stéphane) Les pages Source C'est bon. Mangez-en! Le défi Delphi Règles du forum - FAQ Delphi - Pensez au chtit ![]() Le site de mon frangin |
|
|
|
|
|
#5 (permalink) | |||
|
Membre régulier
![]() Date d'inscription: août 2006
Âge: 25
Messages: 116
|
Bonjour,
une information intéressante Citation:
![]() [QR]Comment partager un objet entre un exécutable (.exe) et une DLL? [QR]Comment passer des strings dans une DLL ? il suffit de mettre SimpleShareMem dans les uses à la place ShareMem ; comme FastShareMem, il n'y a plus besoin de BORLNDMM.DLL et cette unité est fournie de base avec Delphi edit:et rajouter [QR]Comment traquer les fuites de mémoire ? Citation:
[QR]Comment ajouter une icône dans le systray ? Citation:
Dernière modification par gb_68 ; 13/02/2009 à 19h42. |
|||
|
|
|
|
|
#6 (permalink) |
![]() Date d'inscription: octobre 2003
Localisation: Yavin IV
Messages: 5 191
|
pour toutes ces infos gb_68
__________________
Pedro Aucune réponse aux sollicitations techniques par MP Faut pas attendre d'en avoir besoin pour s'en servir... (Lucien Stéphane) Les pages Source C'est bon. Mangez-en! Le défi Delphi Règles du forum - FAQ Delphi - Pensez au chtit ![]() Le site de mon frangin |
|
|
|
|
|
#7 (permalink) |
|
Membre éprouvé
![]() Date d'inscription: mars 2004
Messages: 411
|
J'ai trouvé ça par hasard et je ne l'ai pas trouvé dans la FAQ (enfin j'ai trouvé ceci Comment cacher la fenêtre d'une application console ? mais il me semble intéressant de rajouter ça à part)
http://support.microsoft.com/kb/124103/fr Le but est d'obtenir le Handle de la fenêtre de l'application console. Pour ce faire on va générer un titre unique et chercher la fenêtre qui à ce titre. Code DELPHI :
function GetConsoleHwnd : HWND ; var NewWindowTitle : string ; OldWindowTitle : string ; begin SetLength(NewWindowTitle, 1024) ; // Récupère le titre courant GetConsoleTitle(PChar(OldWindowTitle), 1024); NewWindowTitle := Format('%d/%d', [GetTickCount, GetCurrentProcessId]); // Change le titre SetConsoleTitle(PChar(NewWindowTitle)); // Attend pour que le titre de la fenêtre soit changé Sleep(40); // Charche le nouveau titre Result := FindWindow(nil, PChar(NewWindowTitle)) ; // Restore le titre originnal. SetConsoleTitle(OldWindowTitle); end ; Dernière modification par bubulemaster ; 12/09/2007 à 11h06. |
|
|
|
|
|
#8 (permalink) |
![]() Date d'inscription: juin 2004
Localisation: Frasnes-Lez-Buissenal (Belgique)
Âge: 19
Messages: 4 133
|
Merci pour cette proposition et ta participation
On va traiter tout ça
__________________
sjrd, rédacteur/modérateur Delphi et responsable Newsletter Les règles du forum tu liras et tu respecteras. Ainsi ami des modos tu seras... Participez au projet Sepi |
|
|
|
|
|
#9 (permalink) |
|
Invité de passage
![]() Date d'inscription: avril 2007
Messages: 3
|
[QR]Comment change-t-on la couleur de fond d'un élément de radiogroup ?[QR]
Mise à jour de http://delphi.developpez.com/faq/?pa...fondradiogroup Depuis Delphi 7 (peut-être avant) on peut directement acceder à la propriété Buttons[Index] du Radiogroup ce qui donne accès toutes ses propriétés : Code :
procedure RGB_ColorItem(RadioGroup: TRadioGroup; ItemIndex: Byte; Color: Tcolor); begin RadioGroup.Buttons[ItemIndex].Color := Color; end; |
|
|
|
|
|
#10 (permalink) |
![]() Date d'inscription: octobre 2003
Localisation: Yavin IV
Messages: 5 191
|
Merci pour ta contribution gaabne
__________________
Pedro Aucune réponse aux sollicitations techniques par MP Faut pas attendre d'en avoir besoin pour s'en servir... (Lucien Stéphane) Les pages Source C'est bon. Mangez-en! Le défi Delphi Règles du forum - FAQ Delphi - Pensez au chtit ![]() Le site de mon frangin |
|
|
|
|
|
#11 (permalink) | |
![]() |
salut:
je tiens a proposé une MAJ pour la question énuméré dans la FAQ. Comment envoyer un e-mail avec Delphi ? la solution proposé ne gère pas les connections SSL. Citation:
__________________
je ne répondrai à aucune question technique envoyé par MP, la raison est ici. [PHP MySQL] [D2007][FireBird][MSSQL] Pour ceux qui ont des problèmes de langue cliquez-ici. Mon projet open sources: eMySQLAdmin Visitez mon blog-Mes articles Dernière modification par aityahia ; 20/10/2007 à 16h50. |
|
|
|
|
|
|
#12 (permalink) |
![]() Date d'inscription: octobre 2003
Localisation: Yavin IV
Messages: 5 191
|
Merci pour ta participation
__________________
Pedro Aucune réponse aux sollicitations techniques par MP Faut pas attendre d'en avoir besoin pour s'en servir... (Lucien Stéphane) Les pages Source C'est bon. Mangez-en! Le défi Delphi Règles du forum - FAQ Delphi - Pensez au chtit ![]() Le site de mon frangin |
|
|
|
|
|
#13 (permalink) |
|
Invité de passage
![]() Date d'inscription: septembre 2002
Localisation: Roberval
Messages: 9
|
La FAQ donne un exemple de formatage d'un nombre réel mais il n'y a rien sur les nombres entiers. Pour formater un nombre entier en utilisant les séparateurs de millier, on doit utiliser l'astuce de convertir notre entier en nombre flottant et n'afficher que la partie entière. La fonction format permet de réaliser cela très facilement.
Il existe deux formes d'utilisation de la fonction format. Il est possible d'utiliser une variable locale pour spécifier le séparateur de millier ou le séparateur décimal. Voici un exemple Code :
procedure AfficheEntierFormate; var i:integer; setting:Tformatsettings; begin i:=10000000; //première forme de l'utilisation de la fonction format //L'astuce consiste à diviser l'entier par 1 pour obtenir un nombre flottant //et utiliser le caractère de type de conversion n au lieu de d. //On fixe le nombre de décimale à zéro avec le spécificateur facultatif de précision .0 //On affiche donc une nombre flottant sans afficher les décimales //La fonction format utilisera les paramètres locaux pour formater le nombre showmessage(format('le nombre est %.0n ',[i/1])); //Si le séparateur de millier est l'espace notre valeur sera 10 000 000 //mais rien nous garantie que le séparateur de millier est celui que nous voulons //Si on désire contrôler les paramètres de formatage, il faut déclarer une variable //de type Tformatsetting et utiliser la deuxième forme de la fonction format //On initialise notre variable avec les paramètres régionaux fixés par l'usager GetLocaleFormatSettings(SysLocale.DefaultLCID, setting); //On modifie la valeur ou les valeurs qui nous intéressent setting.ThousandSeparator:=','; showmessage(format('le nombre est %.0n ',[i/1], setting)); //Notre valeur sera affichée à coup sur selon notre désir 10,000,000 end; ![]() Salutations BeTuLa |
|
|
|
|
|
#14 (permalink) |
![]() Date d'inscription: octobre 2003
Localisation: Yavin IV
Messages: 5 191
|
Merci pour ta participation
__________________
Pedro Aucune réponse aux sollicitations techniques par MP Faut pas attendre d'en avoir besoin pour s'en servir... (Lucien Stéphane) Les pages Source C'est bon. Mangez-en! Le défi Delphi Règles du forum - FAQ Delphi - Pensez au chtit ![]() Le site de mon frangin |
|
|
|
|
|
#15 (permalink) |
|
Membre du Club
![]() |
Bonjour seulement j'ai remarqué qu'il n'est pas dit qu'il faut ajouter StrUtils dans la caluse Uses pour la fonction PosEx, et j'ai un problème de compilation ( identificateur non déclaré ) pour le BeginPos , la question dans la Faq c'est :
Comment récuperer les liens dans une page HTML ? Voici le lien |
|
|
|
|
![]() |
![]() |
||
Venez participer à la FAQ Delphi !
|
||
| Outils de la discussion | |
|
|