GRAM03
Messages postés3Date d'inscriptionsamedi 29 mars 2003StatutMembreDernière intervention15 juillet 2012 15 juil. 2012 à 11:10
Pour ecrire dans un Caption sur plusieurs lignes
Utilisez le caractère #13 (Retour Chariot) pour séparer 2 lignes
Label1.Caption := 'Première ligne' + #13 + 'Deuxième ligne';
elguevel
Messages postés718Date d'inscriptionjeudi 19 décembre 2002StatutMembreDernière intervention22 novembre 20163 4 août 2006 à 14:43
Désolé quand meme .. :-D
japee
Messages postés1727Date d'inscriptionvendredi 27 décembre 2002StatutModérateurDernière intervention 6 novembre 20218 4 août 2006 à 13:47
Salut,
J'ai trouvé les notes assez sévères...
On va plus oser poster ! :(
Je trouve l'étude de ce code plutôt intéressante, ne serait-ce que pour rafraîchir ses connaissances en BDR, ParamStr et autres Mutex...
Bon, pour pinailler, à la place de :
If Reg.KeyExists('*\Shell\Dir2DOS\') then
KeyExists := True
Else KeyExists := False;
j'aurais fait :
KeyExists := Reg.KeyExists('*\Shell\Dir2DOS\');
et deux ou trois bricoles encore, mais chacun son style, hein ?
Moi je le trouve très bon, ton humour, elguevel... ;-)
GenEars
Messages postés16Date d'inscriptionmercredi 2 novembre 2005StatutMembreDernière intervention25 janvier 2008 21 juil. 2006 à 14:21
Cirec, bonne approche aussi merci,
sur mon lieu de travail c'était la façon la plus simple d'intégration sur les postes, notamment pour le déploiement : si tu veux bien m'en excuser :)
Tu mets ceci dans le registre
(où dans un fichier texte avec l'extention .REG et tu DblClique dessus):
[HKEY_CLASSES_ROOT\Directory\shell\cmd]
@="Ouvre une Fenêtre de Commande ici"
[HKEY_CLASSES_ROOT\Directory\shell\cmd\command]
@="cmd.exe /k "cd %L""
Et il ne te reste plus qu'a faire un contextuel sur un dossier (dans explorer par Ex.)
et de choisir "Ouvre une Fenêtre de Commande ici" et le tour est joué ...
Pas besoin de programme pour cela un simple fichier text avec ces quatre lignes et tu lui donne l'extention .REG et tu double clique dessus. (même pas besoin de Delphi :-))
Bonne continuation ...
@+
Cirec
elguevel
Messages postés718Date d'inscriptionjeudi 19 décembre 2002StatutMembreDernière intervention22 novembre 20163 21 juil. 2006 à 11:40
Ouai çà laisse un peu sur sa fin ...
Cà se résume à ajouter des clés dans le registre (ou les virer) pour avoir le menu contextuel sur le programme et à :
15 juil. 2012 à 11:10
Utilisez le caractère #13 (Retour Chariot) pour séparer 2 lignes
Label1.Caption := 'Première ligne' + #13 + 'Deuxième ligne';
4 août 2006 à 14:43
4 août 2006 à 13:47
J'ai trouvé les notes assez sévères...
On va plus oser poster ! :(
Je trouve l'étude de ce code plutôt intéressante, ne serait-ce que pour rafraîchir ses connaissances en BDR, ParamStr et autres Mutex...
Bon, pour pinailler, à la place de :
If Reg.KeyExists('*\Shell\Dir2DOS\') then
KeyExists := True
Else KeyExists := False;
j'aurais fait :
KeyExists := Reg.KeyExists('*\Shell\Dir2DOS\');
et deux ou trois bricoles encore, mais chacun son style, hein ?
Moi je le trouve très bon, ton humour, elguevel... ;-)
21 juil. 2006 à 14:21
sur mon lieu de travail c'était la façon la plus simple d'intégration sur les postes, notamment pour le déploiement : si tu veux bien m'en excuser :)
Elguevel, bon résumé ;)
21 juil. 2006 à 12:05
je suis au regret de t'apprendre que ton lien est mort ... :-)
@+
Cirec
21 juil. 2006 à 11:56
21 juil. 2006 à 11:52
on pourrait faire plus simple ... non ?
Tu mets ceci dans le registre
(où dans un fichier texte avec l'extention .REG et tu DblClique dessus):
[HKEY_CLASSES_ROOT\Directory\shell\cmd]
@="Ouvre une Fenêtre de Commande ici"
[HKEY_CLASSES_ROOT\Directory\shell\cmd\command]
@="cmd.exe /k "cd %L""
Et il ne te reste plus qu'a faire un contextuel sur un dossier (dans explorer par Ex.)
et de choisir "Ouvre une Fenêtre de Commande ici" et le tour est joué ...
Pas besoin de programme pour cela un simple fichier text avec ces quatre lignes et tu lui donne l'extention .REG et tu double clique dessus. (même pas besoin de Delphi :-))
Bonne continuation ...
@+
Cirec
21 juil. 2006 à 11:40
Cà se résume à ajouter des clés dans le registre (ou les virer) pour avoir le menu contextuel sur le programme et à :
"ShellExecute(0, 'OPEN', PChar('Cmd.exe'), Nil, PChar(ExtractFilePath(Data2)), SW_SHOW);"