qoprek

Membre
Inscription
18 août 2006
Dernière intervention
26 mars 2007
Interventions
10
Sexe
Homme
Localisation
34830, FRANCE
Signature
Un bogue ? Quel bogue ?

LOGISLEEP : PERMET DE FERMER LA SESSION, D'ÉTEINDRE OU DE REDÉMARRER VOTRE ORDIN

/source/39572-logisleep-permet-de-fermer-la-session-d-eteindre-ou-de-redemarrer-votre-ordinateur-dans-un-temps-ou-une-heure-donnee

Var InstanceApplication : TMaMethodeDetectionMultiInstance; // Garantir l'accès aux libérations dans les cas des exceptions sur Finalization (par exemple: http://qc.borland.com/wc/qcmain.aspx?da=179) Procedure DoneApplication; Begin With Application Do Begin If Handle 0 then ShowOwnedPopups(Handle, False); ShowHint := F...

... maintenant je reconnais que j'ai pas assez commenté ce bout'd'code ... mea culpa de ce coté ... je refais tout cela et je reposterais, avec l'explication du DoneApplication.

Cirec, c'est pas l'objet précis qui compte, c'est juste le mécanisme qui importe, tu t'en fous de quel méthode tu utilises pour détecter les instances ou pour faire tes traces, l'exemple était focus sur un mécanisme global. Faut savoir avoir une vision macro dès fois ... :) L'objectif est didactique et donc vite je coupe-colle et voi...

A noter que Application.Terminate est appelé par le Close ... et n'est que l'envoi d'un WM_QUIT dans la queue msg windows via PostQuitMessage. C'est pas la manière standard de quitter mais peut être utile dans certains cas précis. Son principal défaut est qu'elle n'est pas a action immédiate et donc il faut faire attention a de la rée...

FAUX TRANSPARENT DANS UNE FICHE

/source/39395-faux-transparent-dans-une-fiche

Pour le stayonbottom, ptet en passant par SetWindowPos(form1.handle,HWND_BOTTOM,0,0,0,0,SWP_NOSIZE Or SWP_NOMOVE) dans le form1.Create, form1.Paint et le form1.OnMouseDown (suis pas sûr du SWP_NOSIZE et SWP_NOMOVE, je sais qu'il faut transmettre des options indiquant que l'on ne veut pas déplacer ou changer la fenêtre). J'utilise s...

VERIFICATION D'EXECUTION DU DELPHI "DELPHI32"

/source/39285-verification-d-execution-du-delphi-delphi32

J'ai pas testé mais d'après mes souvenirs je fait comme cela (donc j'écris le code de mémoire, ptet ya des trucs a changer): Il faut rechercher la classe TAppBuilder et si elle est présente alors rechercher (d'après le handle récupéré) si le texte de la fenêtre associé contient Delphi. On aurait une fonction de ce style, tu peux t'arre...

RÉPERTOIRE

/source/39202-repertoire

L'idéal est de lire la doc delphi :) Pour les requêtes normales, voici un exemple (je le rédige sans un delphi sous la main donc ptet des erreurs). Si tu as besoin d'explications, après avoir cherché par toi-même, n'hésite pas à demander. Function ExempleQueryNormale(UneRequete:String;UneDatabase:TIBDataBase):Boolean; Var UneQuery ...

Bonjour, Je ne suis pas sur un poste avec Delphi pour répondre mais néanmoins un premier parcours rapide de ton code m'amène les remarques suivantes, attention je me base sur mes connaissances sur des TIbQuery et non des TAdoQuery donc peut etre me trompe-je: With data.Query_repertoire do begin

DÉFORMES TES FENÊTRES COMME SOUS VISTA!

/source/39215-deformes-tes-fenetres-comme-sous-vista

Je suis en multi moniteur donc ca marchera pas .. zut :( Sinon j'aurais vu une procédure de ce type pour vérifier (j'ai pas du tout testé donc ca ce trouve j'ai écrit des bêtises): Procedure TAnimatorManager.AnimatorCheck(FenetreDeTest:TCustomForm); Var AnimatorClassIDCourant, AnimatorDelayCourant, Compteur ...

Bonjour, Sur mon poste les animations style Vista logicelles ne font rien (juste la tempo qui dure et hop la fenêtre affichée normalement) et les animations style Vista matérielles provoquent une exception générée par Assert(FPBufferARB0,SysErrorMessage(GetLastError)); dans TPBufferCanvas.CreateContextCreateContext. Pour l'excepti...