Jump to content


Photo

[RESUELTO] TrackBar + TImage + ImageList


  • Please log in to reply
5 replies to this topic

#1 enecumene

enecumene

    Webmaster

  • Administrador
  • 7419 posts
  • LocationRepública Dominicana

Posted 16 January 2010 - 01:21 PM

Pues eso, estoy tratando de mostrar las imágenes listadas en un ImageList a un TImage de acuerdo a la posición de un TrackBar, o sea, cuando cambio el trackbar de posicion se vaya mostrando en un TImage imágenes contenidas en un ImageLIst de acuerdo a su índice, algo parecido a esto:



delphi
  1. procedure TFConfig.IconTrackChange(Sender: TObject);
  2. begin
  3.   I := IconTrack.Position;
  4.   Image1.Picture.Bitmap.Assign(Imagelist1.Items[I]);
  5. end;



Pero como verán no existe la propiedad Items :(, ¿una mano?.

Saludos.
  • 0

#2 eduarcol

eduarcol

    Advanced Member

  • Administrador
  • 4483 posts
  • LocationVenezuela

Posted 16 January 2010 - 02:17 PM



delphi
  1. ImageList1.GetBitmap(0,Image1.Picture.Bitmap);



:cheesy:
  • 0

#3 Wilson

Wilson

    Advanced Member

  • Moderadores
  • PipPipPip
  • 2137 posts

Posted 16 January 2010 - 02:17 PM

Intenta con esto no tengo delphi a la mano.



delphi
  1. TImage.Picture.Bitmap := nil;
  2. TImageList.GetBitmap(3, TImage.Picture.Bitmap);// En donde 3 es el índice del TImageList


  • 0

#4 Wilson

Wilson

    Advanced Member

  • Moderadores
  • PipPipPip
  • 2137 posts

Posted 16 January 2010 - 02:19 PM

Me ganaste por una cabeza Eduardo.

Saludos
  • 0

#5 eduarcol

eduarcol

    Advanced Member

  • Administrador
  • 4483 posts
  • LocationVenezuela

Posted 16 January 2010 - 02:24 PM

jeje, se hace lo que se puede  :cheesy:
  • 0

#6 enecumene

enecumene

    Webmaster

  • Administrador
  • 7419 posts
  • LocationRepública Dominicana

Posted 16 January 2010 - 02:41 PM

¡Excelente!, me ha funcionado de perlas :D, gracias compañeros (b).
  • 0




IP.Board spam blocked by CleanTalk.