Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 10-01-2009
Avatar de MAXIUM
MAXIUM MAXIUM is offline
Miembro
 
Registrado: may 2005
Posts: 1.488
Poder: 20
MAXIUM Va camino a la fama
Ocultar barra desplazamiento

Hola, estoy desarrollando una aplicación en la cual muevo una imagen más grande que la forma, así que para ello lo cargo en un ScrollBox.

La idea es poner el mouse sobre la imagen y al hacer click arrastrarla para ver el resto de ella (drag-drop creo que llama). Eso ya lo tengo solucionado, lo que me interesa saber es como evitar que se vean las barras de desplazamiento.

Lo otro y si se puede, es como "cargar" imágenes más grande sin que consuman tanta memoria, la que cargue ocupa como 1MB pero necesito una muchísima más grande, si divido la imagen grande en trozos soportables, me imagino que he de hacer una rutina que al detectar que se ha acabado la imagen cague la que corresponda. La idea es del tipo maps.google.com

Responder Con Cita
  #2  
Antiguo 10-01-2009
Avatar de roman
roman roman is offline
Moderador
 
Registrado: may 2003
Ubicación: Ciudad de México
Posts: 20.269
Poder: 10
roman Es un diamante en brutoroman Es un diamante en brutoroman Es un diamante en bruto
El ScrollBox tiene las propiedades VertScrollBar y HorzScrollBar. En ellas puedes cambiar el atributo Visible a false.

// Saludos
Responder Con Cita
  #3  
Antiguo 10-01-2009
Avatar de MAXIUM
MAXIUM MAXIUM is offline
Miembro
 
Registrado: may 2005
Posts: 1.488
Poder: 20
MAXIUM Va camino a la fama
Cita:
Empezado por roman Ver Mensaje
El ScrollBox tiene las propiedades VertScrollBar y HorzScrollBar. En ellas puedes cambiar el atributo Visible a false.

// Saludos
Gracias Roman, pero cuando hago aquello, deja de hacer lo que quiero que haga.

Código Delphi [-]
var
  Form1: TForm1;
  FPunto: TPoint;
implementation
....
....
....
procedure TForm1.Image1MouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
Begin
     GetCursorPos(FPunto);
end;

procedure TForm1.Image1MouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer);
var
  NuevoPunto: TPoint;
begin
    If ssLeft in Shift then
    Begin
         GetCursorPos(NuevoPunto);
         ScrollBox1.HorzScrollBar.Position:= ScrollBox1.HorzScrollBar.Position + (FPunto.X - NuevoPunto.X);
         ScrollBox1.VertScrollBar.Position:= ScrollBox1.VertScrollBar.Position + (FPunto.Y - NuevoPunto.Y);
         FPunto:= NuevoPunto;
    End;
end;
Responder Con Cita
  #4  
Antiguo 12-01-2009
JXJ JXJ is offline
Miembro
 
Registrado: abr 2005
Posts: 2.475
Poder: 22
JXJ Va por buen camino
MAXIUM
se me ourrio asi de pronto que si pudieras hacer un componente
que descienda del ScrollBox
y le cambies las propiedades de visible.
en lugar de eso que no se dibujen o
hacerlas qeu se vean, de 1 pixel de ancho.
Responder Con Cita
  #5  
Antiguo 12-01-2009
Avatar de MAXIUM
MAXIUM MAXIUM is offline
Miembro
 
Registrado: may 2005
Posts: 1.488
Poder: 20
MAXIUM Va camino a la fama
Interesante vamos aver, aunque estoy falta de tiempo, lo intentare en una versión futura. Gracias.
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Barra de desplazamiento fede__ Varios 5 15-10-2008 04:57:37
Barra de desplazamiento en un TImage fasthorse C++ Builder 11 02-03-2008 14:07:35
color de la barra de desplazamiento Delphius Varios 3 11-07-2005 04:10:39
Barra de desplazamiento en TImage Luli Gráficos 2 26-04-2005 23:34:32
TDBGrid y la barra de desplazamiento Novás Varios 1 30-01-2004 17:16:15


La franja horaria es GMT +2. Ahora son las 00:09:05.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi