begin process at 2012 02 05 02:18:02
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

Divers

 > PIXEL

PIXEL


 Information sur la source

Note :
9 / 10 - par 1 personne
9,00 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :Divers Niveau :Débutant Date de création :31/12/2003 Vu / téléchargé :2 341 / 222

Auteur : skiso

Ecrire un message privé
Commentaire sur cette source (7)
Ajouter un commentaire et/ou une note

 Description

begin
end.



 Fichier Zip

Les Membres Club peuvent télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

Télécharger le zip


 Sources du même auteur

Source avec Zip CACHEZ VOUS DOSSIER PERSONNEL
Source avec Zip LA HOLA
Source avec Zip BOUGE DE LA
Source avec Zip Source avec une capture FORM TRANSPARANTE AVEC COULEUR DE CHOIX ET NIVEAU DE TRANSPA...
Source avec Zip APPLET MOUSE

 Sources de la même categorie

Source avec Zip TRI DBRID CROISSANT ET DECROISSANT par walidlam
Source avec Zip PETITE APPLICATION DE RETENUE par walidlam
Source avec Zip APPLICATION ALIAS+EXCEL par walidlam
Source avec Zip ACCÈS À DIFFÉRENTES PROPRITÉS D'UNE FORME PARENT À PARTIR DE... par ioda19
CODAGE EN BASE64 DE CHAÎNES UNICODE par gta126

Commentaires et avis

Commentaire de Inekman le 01/01/2004 00:42:02

Manifik bebete et le code est très bien, je savais pas qu'on pouvait faire ça aussi facilement.

Bravo skiso.

Commentaire de skiso le 01/01/2004 17:49:40

je veut savoir es qu'il y'a une autre façon de redimensionner image2 a part s'elle si:

///// cette parti est pour que image2 prend la meme taille que image1
image2.Picture.LoadFromFile(OpenPictureDialog1.filename);
image2.Picture:=nil;
///// cette parti est pour que image2 prend la meme taille que image1

merci Inekman

Commentaire de Inekman le 01/01/2004 18:28:47

t'as pas essayé d'utiliser les propriétés "width" et "height" de image1 pour les attribuer à image2 ?

Commentaire de skiso le 01/01/2004 21:04:35

ca ne marche pas

Commentaire de Inekman le 02/01/2004 01:37:49

J'ai trouvéééééééé ! Putain je suis content de pouvoir aider quelqu'un !

Voilà ce que j'ai fait man :

image2 -> propriété "Autosize = False"

et dans ton code tu mets tout simplement ceci :

image2.Width := image1.Width;
image2.Height := image1.Height;

au lieu de :

image2.Picture.LoadFromFile(OpenPictureDialog1.filename);
image2.Picture := nil;

et dans l'évènement OnCreate de Form1 j'ai mis :

Form1.DoubleBuffered := True;

--> c'est pas grâce à cette dernière ligne que ça fonctionne mais c'était pour voir si la différence avec et sans était notable.

Voilà, essaye aussi de ton côté et confirme ou non ma proposition.

Inekman.

Commentaire de ManChesTer le 03/01/2004 17:42:42 administrateur CS

un peux plus vite...

procedure TForm1.Image1MouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
var sx,sy,err:integer;
begin
if select then
begin
  val(Edit1.Text,sx,err);
  if err=0 then
  begin
   val(Edit2.Text,sy,err);
   if err=0 then
    Image2.Canvas.CopyRect(rect(x,y,x+sx,y+sy),Image1.Canvas,rect(x,y,x+sx,y+sy));
  end;
end;
end;

procedure TForm1.Ouvrire1Click(Sender: TObject);
begin
if OpenPictureDialog1.Execute then
begin
  image1.Picture.LoadFromFile(OpenPictureDialog1.filename);
  image2.Picture.assign(Image1.Picture);
  image2.Picture:=nil;
end;
end;

Bon coding...

ManChesTer.

Commentaire de skiso le 03/01/2004 18:31:05

merci tout les deux
ManChester c'est Nettement plus rapid
IneKman desoli ca ne marche pas, et je l'ai essaie au par avant
merci

 Ajouter un commentaire




Nos sponsors


Sondage...

Comparez les prix

CalendriCode

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode

Photothèque

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 4,321 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales