"Hints-bocadillos"

[Wellnic]

Hola

Hay programas que muestran información, avisos, etc. en una especie de hint con un angulito apuntando a un elemento concreto, como se aprecia en esta imagen (http://erwin.ried.cl/inc/image.php?imagen=img/articles/rus_to_spa_001/spa_ballon_03.png&ancholimite=650&altolimite=1000&nocopyright). ¿Cuál es la API encargada de tal menester?

[roman]

:eek: Bocadillos :eek:

Son globos o balones, como los de las historietas o comics. Busca balloon en los foros que ya en alguna ocasión se ha tratado esto.

pd: ya me dio hambre, voy a comer algo :D

// Saludos

[roman]

Je, je, ya veo (http://buscon.rae.es/draeI/SrvltGUIBusUsual?LEMA=bocadillo&TIPO_HTML=2&FORMATO=ampliado&sourceid=mozilla-search):


4. m. En grabados, dibujos, caricaturas, chistes gráficos, tebeos, etc., espacio, generalmente circundado por una línea curva que sale de la boca o cabeza de una figura, en el cual se representan palabras o pensamientos atribuidos a ella.


Yo sólo concocía los bocadillos que se comen. :D

// Saludos

[Wellnic]

Gracias, roman. Estos balloons siempre me recordaron a los tebeos que leía en mi infancia... mientras me comía un bocadillo :D .

Por lo que estoy leyendo, son bastante complicados de utilizar. Yo creía que iban a ser tan sencillos como los hints...

[Lepe]

No son difíciles, al menos los de Hints, y para ello busca por torry por "BalloonHints" que seguro encuentras uno fácil.

Yo uso uno de la JVCL y puedes decirle en qué control debe mostrarse el bocata.

Para usarlos en la barra de tarea, si se usa otra técnica distinta, aunque el "globito" tenga la misma apariencia.

Saludos

[andresilvaus]

var IconData: TNotifyIconDataEx; // Data of the tray icon wnd.

.
.
.

function TCoolTrayIcon.ShowBalloonHint(Title: String; Text: String;
IconType: TBalloonHintIcon; TimeoutSecs: TBalloonHintTimeOut): Boolean;
// Show balloon hint. Return false if error.
const
aBalloonIconTypes: array[TBalloonHintIcon] of Byte =
(NIIF_NONE, NIIF_INFO, NIIF_WARNING, NIIF_ERROR);
begin
// Remove old balloon hint
HideBalloonHint;
// Display new balloon hint
with IconData do
begin
uFlags := uFlags or NIF_INFO;
StrLCopy(szInfo, PChar(Text), SizeOf(szInfo)-1);
StrLCopy(szInfoTitle, PChar(Title), SizeOf(szInfoTitle)-1);
TimeoutOrVersion.uTimeout := TimeoutSecs * 1000;
dwInfoFlags := aBalloonIconTypes[IconType];
end;
Result := ModifyIcon;
{ Remove NIF_INFO before next call to ModifyIcon (or the balloon hint will
redisplay itself) }
with IconData do
uFlags := NIF_ICON + NIF_MESSAGE + NIF_TIP;
end;

function TCoolTrayIcon.HideBalloonHint: Boolean;
// Hide balloon hint. Return false if error.
begin
with IconData do
begin
uFlags := uFlags or NIF_INFO;
StrPCopy(szInfo, '');
end;
Result := ModifyIcon;
end;

.
.
.

function TCoolTrayIcon.ModifyIcon: Boolean;
// Change icon or tooltip if icon already placed
begin
Result := False;
if InitIcon then
Result := Shell_NotifyIcon(NIM_MODIFY, @IconData);
end;

[Wellnic]

Muchas gracias.