¡Hola!
Buscando con la opción
Find in files de Delphi 7, encontré que ese mensaje es el valor de la constante SNoPropertyPageAvailable, usada en la unidad OCXReg.pas:
Código Delphi
[-]
procedure TOleControlEditor.DoVerb(Verb: Integer);
begin
try
if Verb = -65536 then
TOleControl(Component).ShowAboutBox
else
TOleControl(Component).DoObjectVerb(Verb);
except
case Verb of
-65536: raise Exception.CreateRes(@SNoAboutBoxAvailable);
OLEIVERB_PROPERTIES: raise Exception.CreateRes(@SNoPropertyPageAvailable);
else
raise;
end;
end;
end;
También a mí me aparece cuando doy doble clic sobre el componente. Supongo que es normal que se eleve esa excepción cuando no hay un cuadro de diálogo de propiedades qué mostrar.
Cita:
Empezado por Winsock
cuando hago doble click para ver el codigo
|
Si con esto te refieres a escribir código para los eventos del componente, en lugar de hacer doble clic, selecciónalo y presiona la tecla Enter (o la clásica e incómoda F11
).
Con esto aparecerá el inspector de objetos, en el cual encontrarás la pestaña
Events con la lista de todos los eventos en los cuales podrás
ver y escribir tu código.
Espero te sirva. Esperamos tus comentarios.
Al González.