MensajePublicado: Mie 21 May, 2003 9:15 am    Asunto: Preview en castellano (o el idioma que se quiera) Responder citando
Hay una consulta planteada por Glycymeris con el título Cambiar de idioma el botón del preview de quickreport en el que se sugiere como hacer que los cometarios (hints) aparezcan en castellano. Se puede hacer que aparezca el texto (caption) debajo del gráfico del botón con este código insertado en el evento OnBeforePrint del QuickReport correspondiente:
Código:
HWND hWnd = FindWindow("TQRStandardPreview", NULL);
hWnd = FindWindowEx(hWnd, NULL, "TToolBar", NULL);
if (IsWindow(hWnd))
{
     TToolBar *toolBar = dynamic_cast<TToolBar*>(FindControl(hWnd));
     if (toolBar)
     {
          toolBar->ShowCaptions = true;
          toolBar->ShowHint     = false;
          // 0 - Separador
          toolBar->Buttons[1]->Caption = "Completa";
          toolBar->Buttons[2]->Caption = "100%";
          toolBar->Buttons[3]->Caption = "Ajustar";
          // 4 - Separador
          toolBar->Buttons[5]->Caption = "Primera";
          toolBar->Buttons[6]->Caption = "Anterior";
          toolBar->Buttons[7]->Caption = "Siguiente";
          toolBar->Buttons[8]->Caption = "Última";
          // 9 - Separador
          toolBar->Buttons[10]->Caption = "Ir a...";
          // 11 - Separador
          toolBar->Buttons[12]->Caption = "Configurar";
          toolBar->Buttons[13]->Caption = "Imprimir";
          // 14 - Separador
          toolBar->Buttons[15]->Caption = "Guardar";
          toolBar->Buttons[16]->Caption = "Abrir";
          // 17 - Separador
          toolBar->Buttons[18]->Caption = "Cerrar";
     }
}

Lo único que hecho sobre la respuesta dada en Cambiar de idioma el botón del preview de quickreport por _Leo es sustituir ->Hint por ->Caption, activar su visulización con toolBar->ShowCaptions = true y ocultar el comentario con toolBar->ShowHint = false.

Con estos literales a mi me caben justos los botones en una sola línea (resolución de pantalla 800 x 600)

También se puede jugar con los botones, ocultando los que nos puedan interesar. Por ejemplo, con:
Código:
toolBar->Buttons[15]->Visible = false;
toolBar->Buttons[16]->Visible = false;
toolBar->Buttons[17]->Visible = false;

ocultamos los botones Guardar, Abrir y el último separador.
La otra alternativa facilitada por _Leo (modificar el fichero QrPrev.Dfm), personalmente no he conseguido ponerla en marcha.
_________________
Un saludo

Necesitamos tu ayuda: Envía AI al 27595 (Coste 1,20 euros + IVA)