LA FORME MAGIQUE
cs_bgK
Messages postés
131
Date d'inscription
vendredi 7 juin 2002
Statut
Membre
Dernière intervention
19 janvier 2004
-
25 avril 2003 à 20:52
JackTheRipp3r Messages postés 50 Date d'inscription jeudi 1 mai 2003 Statut Membre Dernière intervention 5 février 2004 - 5 mai 2003 à 20:33
JackTheRipp3r Messages postés 50 Date d'inscription jeudi 1 mai 2003 Statut Membre Dernière intervention 5 février 2004 - 5 mai 2003 à 20:33
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
https://codes-sources.commentcamarche.net/source/12494-la-forme-magique
https://codes-sources.commentcamarche.net/source/12494-la-forme-magique
5 mai 2003 à 20:33
J'aimerais juste m'adresser à Delphiprog et à TheVelho en leur demandant dans quels établissements il prennent leurs cours et de préciser la nature de ces cours (enfin ce serait sympa koa, en me relisant j'ai vu que la question était posée de manière un peu trop comment dire, euh ... obligeante ^^)
Merci ! Bon coding @ tous!!!
26 avril 2003 à 14:51
D'autre part pour la note, je suis d'accord avec Delphiprog !
26 avril 2003 à 09:37
En cours, quand on est pris en flagrant délit de copie, on se ramasse un zéro.
Faute de ne pas pouvoir faire autrement, on mettra 1.
26 avril 2003 à 08:52
Sinon, je voudrais juste ajouter que sakr188 m'a remercié par message privé à 21:04 : "Mercie de votre commentaire sur ma source ".
26 avril 2003 à 02:09
source sympatike tou de meme le truk por deplacer la form je cherchais ca en cour et ba g trouvé =)
25 avril 2003 à 23:16
Dailleurs, pourquoi ne pas les mettre dans une boucle :
for i := 0 to 2 do
ShowMessage('La forme magique');
Ca te ferait gagner du temps... ouf, ouf, ouf ;-0
25 avril 2003 à 20:52
Il serait intéressant de pouvoir déplacer la fenêtre. Pour ce faire il faut placer le code qui suit dans l'évènement MouseMove de Image1 :
If ssLeft in Shift Then
Begin
ReleaseCapture;
Perform(WM_SYSCOMMAND, $F012, 0);
If Top < 0 then Top := 0;
If Top + Height > Screen.Height then Top := Screen.Height - Height;
If Left < 0 then Left := 0;
If Left + Width > Screen.Width then Left := Screen.Width - Width;
end;
(Ce code n'est pas de moi, et je remercie son auteur)