Tout d'abord je tient à préciser que je reprend une sources de Bestiol qu'il m'avait envoyer mais qui ne marchait pas, je vous poste donc celle ci refaite et donc qui fonctionne.
Le prog consiste simplement à enregistrer une image et ou un texte
dans un fichier et de relire ce fichier par la suite.
Félicitation :), moi aussi je voulais faire quelques choses de ce genre, j'ai mis au point ma Shining Database, elle permet donc de gerer un fichier binaire et d'y mettre tout ce qu'ont veux, image, sons ect.... sauf que je me suis inspiré de la base de registre windows, exemple on peut faire WriteString('MonPertoirePrincipaleMonSousRepertoire','MaClé','MaValeur');
bien entendu il n'ya pas de limitation dans le Path, je ne l'est pas encore terminer mais promis je mettrais la source aux profits de tous ;), et pour infos pour le problème des Jpeg il suffit d'inclure dans la clause 'Jpeg', ensuite de créé un compo de type TJpegImage
exemple
var
M:TMemoryStream;
J: TJpegImage;
begin
M:= TMemoryStream.create;
// ect...... chargement du flux
puis M.Seek(MonOffset, soFromBeginning);
J:= TJPegImage.Create;
J.LoadFromStream(M);
Image1.Picture.Graphic:=J;
M.Free;
{
Attention ne pas detruire J;
voila ça evite ainsi de devoir mettre une image dans le TImage ;)
};
end;
Bonne Prog @+
Merci bien Delphi prog pour ce petit conseil et pour ce compliment, je ne prog que depuis 1 mois alors je débute sec on va dire, niveau sécurité et secret de programmation je ne connait pas encore. Mais je fouille beaucoup et je me suit dit que ceci pourrait surement déjà aidé quelques débutant comme moi...
Merci encore !
Extra !
Félicitations.
Une suggestion pour éviter les problèmes de relectures futures : déclarer un type de signature Str8 = String[8] et l'utiliser pour définir
const
Signature: str8 = 'Antidote';
et la variable sig dans btnOpenFileClick (renommée par mes soins), au cas où quelqu'un changerait le longueur de la signature à un endroit et pas à un autre. Tu imagines les conséquences ?
bonne prog à toi, j'espère que ton projet aboutira bientôt ça a l'air bien intéressant :) @ +
bien entendu il n'ya pas de limitation dans le Path, je ne l'est pas encore terminer mais promis je mettrais la source aux profits de tous ;), et pour infos pour le problème des Jpeg il suffit d'inclure dans la clause 'Jpeg', ensuite de créé un compo de type TJpegImage
exemple
var
M:TMemoryStream;
J: TJpegImage;
begin
M:= TMemoryStream.create;
// ect...... chargement du flux
puis M.Seek(MonOffset, soFromBeginning);
J:= TJPegImage.Create;
J.LoadFromStream(M);
Image1.Picture.Graphic:=J;
M.Free;
{
Attention ne pas detruire J;
voila ça evite ainsi de devoir mettre une image dans le TImage ;)
};
end;
Bonne Prog @+
Merci encore !
Félicitations.
Une suggestion pour éviter les problèmes de relectures futures : déclarer un type de signature Str8 = String[8] et l'utiliser pour définir
const
Signature: str8 = 'Antidote';
et la variable sig dans btnOpenFileClick (renommée par mes soins), au cas où quelqu'un changerait le longueur de la signature à un endroit et pas à un autre. Tu imagines les conséquences ?
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.