Ir al contenido


Foto

[RESUELTO] TrackBar + TImage + ImageList


  • Por favor identifícate para responder
5 respuestas en este tema

#1 enecumene

enecumene

    Webmaster

  • Administrador
  • 7.419 mensajes
  • LocationRepública Dominicana

Escrito 16 enero 2010 - 01:21

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
  • 4.483 mensajes
  • LocationVenezuela

Escrito 16 enero 2010 - 02:17



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



:cheesy:
  • 0

#3 Wilson

Wilson

    Advanced Member

  • Moderadores
  • PipPipPip
  • 2.137 mensajes

Escrito 16 enero 2010 - 02:17

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
  • 2.137 mensajes

Escrito 16 enero 2010 - 02:19

Me ganaste por una cabeza Eduardo.

Saludos
  • 0

#5 eduarcol

eduarcol

    Advanced Member

  • Administrador
  • 4.483 mensajes
  • LocationVenezuela

Escrito 16 enero 2010 - 02:24

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

#6 enecumene

enecumene

    Webmaster

  • Administrador
  • 7.419 mensajes
  • LocationRepública Dominicana

Escrito 16 enero 2010 - 02:41

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




IP.Board spam blocked by CleanTalk.