DJIKSTRA EN MODE GRAPHIQUE
Nicolas___
Messages postés
992
Date d'inscription
jeudi 2 novembre 2000
Statut
Membre
Dernière intervention
24 avril 2013
-
9 déc. 2008 à 18:03
cs_djawahir Messages postés 2 Date d'inscription vendredi 17 février 2012 Statut Membre Dernière intervention 17 février 2012 - 17 févr. 2012 à 20:58
cs_djawahir Messages postés 2 Date d'inscription vendredi 17 février 2012 Statut Membre Dernière intervention 17 février 2012 - 17 févr. 2012 à 20:58
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/48670-djikstra-en-mode-graphique
https://codes-sources.commentcamarche.net/source/48670-djikstra-en-mode-graphique
17 févr. 2012 à 20:58
17 févr. 2012 à 20:57
16 déc. 2008 à 11:14
donc mieux qu'on utilise l'allocation statique que l'allocation dynamique même que sa pose un problème de gaspillage mais bon Mieux que rien!!
BY OFFLAKE
15 déc. 2008 à 18:19
C'est juste que ça me donne des boutons ces trucs là.
Parce que bon, récuperer une fuite mémoire à tataouine sur un pointeur, faut dire que c'est quand même extremement casse bonbond :D
15 déc. 2008 à 18:03
Pas forcément très inspiré mon exemple... En plus, le code plus long est plus lent pour copier de petites zones mémoire.
Autre exemple concret : les algos de tri. Un tri à bulle fait quelques dizaines de lignes... Un quicksort, plus rapide à l'exécution, est nettement plus long à codé... Encore plus si on le dérecursifie pour gagner encore plus.
15 déc. 2008 à 17:45
Des pointeurs +_+
15 déc. 2008 à 14:51
Par curiosité, on peut aller voir la fonction Move (Appelée par CopyMemory) proposée par Delphi. Elle utilise le même algo que Copy_MemoryEx (4 octets d'abord, puis octets par octets pour finir). Par contre, rédigée en assembleur, elle est plus dense et probablement nettement plus rapide.
type PTByteArray = ^TByteArray;
type TCardinalArray = array[0..High(Word) div SizeOf(Cardinal)] of Cardinal;
type PTCardinalArray = ^TCardinalArray;
implementation
{$R *.dfm}
procedure Copy_Memory(const lpDest: PTByteArray; const lpSrc: PTByteArray; const nSize: Cardinal);
var
nI: Integer;
begin
for nI:= 0 to nSize - 1 do
lpDest[nI]:= lpSrc[nI];
end;
procedure Copy_MemoryEx(const lpDest: PTByteArray; const lpSrc: PTByteArray; const nSize: Cardinal);
var
lpDestCard: PTCardinalArray;
lpSrcCard: PTCardinalArray;
nI: Integer;
nFirstCopyEnd: Integer;
begin
lpDestCard:= PTCardinalArray(lpDest);
lpSrcCard:= PTCardinalArray(lpSrc);
for nI:= 0 to nSize div 4 - 1 do
lpDestCard[nI]:= lpSrcCard[nI];
nFirstCopyEnd:= (nSize div 4) * 4;
for nI:= nFirstCopyEnd to nFirstCopyEnd + nSize mod 4 - 1 do
lpDest[nI]:= lpSrc[nI];
end;
procedure TForm1.Button1Click(Sender: TObject);
var
lpSrc: String;
lpDest: array [0..MAX_PATH] of char;
nSize: Integer;
begin
lpSrc:= '123';
Copy_MemoryEx(PTByteArray(@lpDest), PTByteArray(lpSrc), length(lpSrc) + 1);
ShowMessage(lpDest);
end;
13 déc. 2008 à 07:35
Bon week-end !
13 déc. 2008 à 07:25
Je c que le compilateur ne tien pas compte des commentaires Né au moin un code source plus optimale remplace les commentaires!!
BY OFFLAKE
12 déc. 2008 à 18:24
10 déc. 2008 à 07:06
Pour les commentaires je pense que tu sais qu'est ce qu'un Canvas...etc
DOnc le code est plus Optimal que possible et je pense qu'il est plus comprehensible que les autres Codes
Oui Ta raison!!
Pour les prochaine Source je tient en compte les commentaires
Merci John Dogget
BY OFFLAKE
10 déc. 2008 à 07:03
Pour le nommage des composants Oui ta raison je nome pas tjrs et je sais que c'est une mauvaise habitude ok!!
Pour la prochaine Source j'essay d'être plus réaliste
BY OFFLAKE
9 déc. 2008 à 21:48
Par contre, t'oublie pas de nous coller un à propos de 3m².
C'est comme d'hab avec tes sources en fait.
9 déc. 2008 à 18:03
Ciao