Accueil > Forum > > > > Question URGENTE, merci de m'aider
Question URGENTE, merci de m'aider
mercredi 4 avril 2007 à 17:14:01 |
Question URGENTE, merci de m'aider

Hamhama007
|
Bonjour  Je voulai d'abors vous dire que je ne connai rien en Delphi et tous ce qui est programmation...  En recherchant une fois sur votre site quelque chose pour proteger mon CD contre le gravure, je suis tomber sur ce 'message' : http://www.delphifr.com/codes/PROTECTION-CONTRE-COPIE-SUR-CD_11892.aspxj'ai déja perdu 2 cd  en essayant ce qu'il y est ecrit alors je me suis dis qu'il falait peut-etre changer quelque chose dans la 'Source' que vous trouverez ci-dessous: Source- Procedure craye_file_inc;
- var j : int64;
- buf : array[word] of byte;
- St : TFileStream;
- begin
- for j:=0 to 32766 do
- buf[j]:=byte(j); // ne pas crayé un fichier de moins de 32k
- st:=Tfilestream.create('Protection.dat',fmCreate);
- for j:=0 to 10 do
- st.write(Buf,Sizeof(Buf));
- st.free;
- end;
- // dans votre programme
- Function CheckIfOriginalCd:Boolean
- var f : thandle;
- b : array[0..500] of byte;
- lus : integer;
- Totlus : Int64;
- begin
- result:=false;
- Totlus:=0;
- ifnot fileexist('Protection.dat') then exit;
- f:=Filecreate('Protection.dat',fmRead);
- while true do
- begin
- try
- Fileread(f,b,lus);
- exept
- break;
- end;
- totlus:=totlus+lus;
- if lus=0 then
- break;
- end;
- if filesize('Protection.dat')<>Totlus then
- if attributs, time etc etc... then
- result:=true;
- end;
Je voulais que vous m'aider un peu sur cette source et ce que je dois en faire  Merci beaucoup  Le Temp C'est De L'argent; Economisez Les Deux...
|
|
mercredi 4 avril 2007 à 17:49:11 |
Re : Question URGENTE, merci de m'aider

Matt 261
|
Salut,
déjà, la prochaine fois, met un titre explicite à ton topic.
Ensuite : si tu es débutant en Delphi, je te recommende de commencer par des codes simples avant de finir par détruire tous tes CD !
@+ Matt
La paresse est la mère du génie...
|
|
mercredi 4 avril 2007 à 17:51:04 |
Re : Question URGENTE, merci de m'aider

Matt 261
|
Ah oui, et si tu pouvais réduire la taille de ta signature, ce serait sympa aussi !  (nous n'avons pas encore de problèmes de vue !) @+ Matt La paresse est la mère du génie... http://www.delphilab.com
|
|
mercredi 4 avril 2007 à 17:53:55 |
Re : Question URGENTE, merci de m'aider

japee
|
Salut, - question urgente, - j'ai déjà perdu 2 cd... Ho... arrête tout de suite, là. Tu vas (ni) heu bousiller tous tes CD de Céline Dion ! 
|
|
mercredi 4 avril 2007 à 17:59:51 |
Re : Question URGENTE, merci de m'aider

Matt 261
|
Ah bein ça alors ! Japee serait-il passé modo ? Bon... bon je sais, ça fait un moment que je n'ai pas fait de coucous mais ça alors c'est une bonne nouvelle ! Ca veut dire qu'on va avoir droit à des tartes au comcombr' plus souvent alors ?  @+ Matt La paresse est la mère du génie... http://www.delphilab.com
|
|
mercredi 4 avril 2007 à 18:13:31 |
Re : Question URGENTE, merci de m'aider
|
mercredi 4 avril 2007 à 18:13:35 |
Re : Question URGENTE, merci de m'aider

Hamhama007
|
Je sais que je dois commencer par prendre des cours en Delphi Mais... C'EST URGENT!!! Merci Le Temp C'est De L'argent; Economisez Les Deux...
|
|
mercredi 4 avril 2007 à 18:21:33 |
Re : Question URGENTE, merci de m'aider

Matt 261
|
@ Japee : mdr ! Je vais essayer de me libérer plus souvent alors ! @ Hamhama : la signature hamhama, le bouton pour la taille, là, devant tes yeux ...! La paresse est la mère du génie... http://www.delphilab.com
|
|
mercredi 4 avril 2007 à 18:59:42 |
Re : Question URGENTE, merci de m'aider

Francky23012301
|
Bon : tu demandes de l'aide tellement gentiment, que l'on va t'aider :
*Prendre une tarte o concombre et la manger entièrement. *Péter trois fois. *Prendre une plume de faisaon fraichement tuée et se la mettre dans les fesses. *Faire quatre sauts en avant et 5 en arrière, le tout en faisant le crie du dindon. *Ensuite retirer la plume délicatement. *Sonner chez son voisin et lui faire renifler la plume. *Profiter de son évanouissement pour lui couper un bout de cheveux. *Prendre son poisson rouge et le passer au Mixer. *Prier la Déese HounKouLouKou
HounKouLouKou, toi la déesse des plumes dans le cul Offre moi ton esprit; Offre moi ton courage; Ofrre moi ton savoir Fasse que le code de Manchester fonctionne
Répeter cette incantation toute la nuit en pensant à faire un mouvement de rotation dans le sens des aiguilles d'une montre avec la plume et un mouvenemnt de triangle avec les cheveux.
Finir le rituel en avalant le poisson fraichment mixer.
Normalement dans 6 mois, le code devrait fonctionner.
|
|
mercredi 4 avril 2007 à 20:21:55 |
Re : Question URGENTE, merci de m'aider

cirec
|
@ Matt
voir même des tartes avec double comcombr' @+ Cirec
|
|
Cette discussion est classée dans : protection, dat, buf, st, totlus
Répondre à ce message
Sujets en rapport avec ce message
CONCOURS!!! CONCOURS!!! [ par sebrs1 ]
Salut à tous les programmeurs delphi.j'organise un petit concours sur mon site.delphiprog.fr.stc pas un concour tres dur mais vous pouvez y mettre tou
Fonction pour séparer des champs dans une chaine [ par belkin ]
Bonjour,Existe-t-il une fonction qui permet de séparer des champs dans une chaine ?Exemple : MaVariable := '123_456.dat';Je veux séparer le 123 et 456
Protection d'un logiciel contre la copie [ par bfouad ]
Bonjour,je désire connaître quels sont les méthodes existantes pour proteger un logicel contre la copie ?Merci.
CONCOURS sur delphiprog.fr.st [ par sebrs1 ]
Comme il n'y a pas eu encore de concours sur delphifr je me suis dis qu'il FALLAIT en faire un pour tester les competences de ses visiteurs. Le concou
CONCOURS sur delphiprog.fr.st [ par sebrs1 ]
Comme il n'y a pas eu encore de concours sur delphifr je me suis dis qu'il FALLAIT en faire un pour tester les competences de ses visiteurs. Le concou
PROG-Zone.fr.st - Le site de tous les langages de programmation [ par sebrs1 ]
Salut à tout le monde, je viens de faire un nouveau site concernant tout les langages de programmations (ou presque :)), je vous en supplie, allez-y p
Concours sur Prog-zone.fr.st [ par sebrs1 ]
Prog-zone vous propose un concours dans le langage de votre choix. Si ça vous interesse :prog-zone.fr.st@+Sebrs1PS (qui ne signifie pas playstation :-
protection de repertoir (dossier) pas en reseau [ par skiso ]
sq en peut proteger un repertoir si oui comment?
pb avec pointeur [ par moffer ]
voila je suis un peu nouveau sur delphi et je me demande pourquoi ce code ne fonctionne pasprocedure TForm1.Button1Click(Sender: TObject);var Buf: St
nouveau forum informatique ! [ par rhodan51 ]
bonjour à tous,je viens de créer un nouveau forum informatique sur divers languages de prgrammation et je cherche des personnes ayant de bonnes notion
Livres en rapport
|
Derniers Blogs
[TECHDAYS 2012] SESSION WEBMATRIX 2 : LE COUTEAU SUISSE GRATUIT POUR VOS DéVELOPPEMENTS WEB - SLIDES[TECHDAYS 2012] SESSION WEBMATRIX 2 : LE COUTEAU SUISSE GRATUIT POUR VOS DéVELOPPEMENTS WEB - SLIDES par gpommier
Suite à la session que j'ai présenté sur WebMatrix 2, vous pouvez trouver les slides ici, ainsi que les démos en packages nuget : démos1 et démos2 J'en profite pour remercier chaleureusement tous ceux qui sont venus très nombreux à cette sess...
Cliquez pour lire la suite de l'article par gpommier [SHAREPOINT] LES SESSIONS TECHDAYS 2012.[SHAREPOINT] LES SESSIONS TECHDAYS 2012. par Patrick Guimonet
Voici donc pour ceux qui n'ont pas pu venir, ou ceux qui n'ont pas pu toutes les suivre la liste des sessions SharePoint aux TechDays 2012, que je mettrais à jour dès que les liens des vidéo seront disponibles. Ou ici : http...
Cliquez pour lire la suite de l'article par Patrick Guimonet TECHDAYS PARIS 2012 : SESSION PLEINIèRE JOUR 3TECHDAYS PARIS 2012 : SESSION PLEINIèRE JOUR 3 par ROMELARD Fabrice
Speaker: Bernard Ourghanlian Cette session est comme chaque jour transmise en live par BrainSonic, et j'ai donc suivi cette troisième pleinière par ce moyen sur mon iPad . Elle est dédiée comme chaque année à la mise en perspective de l'é...
Cliquez pour lire la suite de l'article par ROMELARD Fabrice MISHRA READER : UN LECTEUR RSS TRèS ZUNE STYLE EN OPEN SOURCE !MISHRA READER : UN LECTEUR RSS TRèS ZUNE STYLE EN OPEN SOURCE ! par Vko
Hier durant une session dédiée aux Techdays 2012, j'ai eu le plaisir d'annoncer la sortie de la Béta 2 de Mishra Reader. C'est quoi ? Pour les utilisateurs, c'est une vraie expérience de lecture de flux RSS sur Windows. Rien à voir avec les produit...
Cliquez pour lire la suite de l'article par Vko [FRAMEWORK 4] LES TASKS ET LE THREAD UI[FRAMEWORK 4] LES TASKS ET LE THREAD UI par fathi
Je viens de passer quelques temps au TechDay's et j'ai pu voir pas mal de session intéressante. Par contre une chose m'a un peu étonné lors de certaines de ces sessions qui abordaient les améliorations du framework .NET (donc le 4.5) : en gros, bea...
Cliquez pour lire la suite de l'article par fathi
Logiciels
Academy System (17.2.1.0)ACADEMY SYSTEM (17.2.1.0)Logiciel de gestion des établissements.
- élèves/étudiants (inscription, dossier, absence...)
-... Cliquez pour télécharger Academy System Easy-Planning (1.0.0.1)EASY-PLANNING (1.0.0.1)Basé sur les mêmes principes que MyPlanning, Easy-Planning permet de créer des plannings sous la ... Cliquez pour télécharger Easy-Planning COLLECTOR PLUS (3.00B)COLLECTOR PLUS (3.00B)COLLECTOR PLUS version 3.00B est un logiciel utilisant une base de données alimentée par :
- L... Cliquez pour télécharger COLLECTOR PLUS PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO (V7.4)PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO (V7.4)PONAMEDIA TV DEVIENS HELLLOOO FLASH
LA TV SUR VOTRE ORDINATEUR.
Toute une plateforme Multi... Cliquez pour télécharger PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO LettresFaciles 2011 (8.0.0.1)LETTRESFACILES 2011 (8.0.0.1)LettresFaciles est un logiciel facilitant la création et la rédaction de lettres types.
Son inte... Cliquez pour télécharger LettresFaciles 2011
|