Hola... hace tan solo unas cuantas horas esto llegaba a la página 4, ahora veo que está en la 7.
¡Como que hay mucho tiempo libre!
No sigan... que me dejan atrás en el marcador... ¡me voy a quedar solito!
Código Delphi
[-]
procedure IncrementarNroMensaje;
var NroNuevo: integer;
begin
NroNuevo := NroMsj + Random(10);
if NroNuevo = NroMsj
then begin
inc(NroMsj, CantMsj(roman) div 10);
SendMessage('Gracias roman por colaborar con la cuenta XD');
end
else NroMsj := NroNuevo;
end;
....
if DelphiusConectado
then IncrementarNroMensaje;
No probé el código... pero la idea es que si no logro poner algún mensaje... intentar "robarle" unos puntos al maestro roman
Saludos,
PD: Las cosas que uno inventa cuando tiene sueño.