FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
#1
|
|||
|
|||
Links en Delphi
Se que tal vez es muy sencillo, pero no lo se:
¿ Como hago un link (enlace) de una etiqueta de Bases de Datos en Delphi 5? |
#2
|
|||
|
|||
Hola, supongo que te refieres a esto, aunque no lo dejas del todo claro:
Por un lado, te gustará que al pasar el mouse sobre el TDBText, cambie la apariencia del cursor, sólo tienes que asignar la propiedad cursor del TDBText, por ejemplo a crHandPoint. También sería ideal interceptar cuando se pasa por encima para cambiar el color del TDBText, pero esto no es tan fácil porque no hay eventos publicados para cuando se entra y cuando se sale del área de dicho componente (los hay protegidos pero eso implicaría crear un componente heredado). Cuando el usuario pulse sobre el TDBText, capturas el evento OnClick, o tal vez el OnMouseDown, y lanzas este código: Código:
procedure TDialogoCreditos.Label5MouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer); begin ShellExecute(Application.MainForm.Handle , 'open', PChar(TDBText(Sender).Field.AsString), nil, nil, SW_MAXIMIZE); end;
__________________
Guía de Estilo |
Herramientas | Buscar en Tema |
Desplegado | |
|
|
|