|
Esta sección te permite ver todos los posts escritos por este usuario. Ten en cuenta que sólo puedes ver los posts escritos en zonas a las que tienes acceso en este momento.
Mensajes - BlackTigerX
26
« en: Viernes 23 de Abril de 2004, 21:53 »
cuando mandas llamar ese servidor desde la maquina "problema", la mandas llamar por nombre o por direccion IP? podria ser que el unico problema sea que no puedas ver el nombre, pero la direccion si... trata cambiando a ip en caso de que estes usando el nombre
27
« en: Jueves 22 de Abril de 2004, 21:43 »
eso ya tiene mas que ver con la red en si, checate que puedas ver la otra maquina desde esa donde te da el error: generalmente un "ping" (desde DOS) te dira si la puedes ver, si te funciona el ping, dale un "tracert [direccion ip del servidor]", ex. tracert 172.29.10.77
si el ping o el tracert no te reponden entonces tendras que ver con los de redes para que ruteen esas direcciones y se puedan ver esas maquinas
28
« en: Jueves 18 de Marzo de 2004, 15:57 »
asi es... bien estructurado y "educado"
lo unico que me inquieto fue eso de que "Pascal no tiene GOTO (salto incondicional)"... no se que version usas, pero Pascal siempre ha tenido GOTO... claro que no se recomienda su uso (excepto en casos muy especiales)
29
« en: Martes 16 de Marzo de 2004, 06:02 »
una pagina que no te puede faltar es esta: http://www.q3.nu/trucomania/yo aprendi muchisimo de ahi
30
« en: Viernes 27 de Febrero de 2004, 15:53 »
si creas el formulario dinamicamente, debes poder cambiar esa propiedad: with TMyForm.Create(nil) do begin FormStyle:=fsNormal //donde quieres que funcione normal end
with TMyForm.Create(nil) do begin FormStyle:=fsMDIChild //donde quieres que sea Child end
...el unico truco es que tiene que ser creada dinamicamente (no automaticamente)
31
« en: Viernes 27 de Febrero de 2004, 15:49 »
hace pocas semanas salio un virus que hace eso... tienes que desactivar los servicios de RPC, y luego ir al sitio de update de microsoft por los ultimos patches
para desactivar RPC te vas a: Windows Start button Run
teclea
services.msc
busca
Remote Procedure Call (RPC)
da click derecho, propiedades, cambia el Startup Type a "Disabled"
tienes 60 segundos para hacer eso... suerte
33
« en: Viernes 20 de Febrero de 2004, 01:41 »
puedes poner el codigo que estas usando y el error que te tira?... estoy seguro que con eso te podriamos ayudar mejor
salu2
34
« en: Viernes 20 de Febrero de 2004, 01:40 »
pues este es el unico componente gratis que se que puede abrir .TIFF y muchos otros tipos de imagenes: http://www.delphi-gems.com/Graphics.phpyo uso Pegasus, es excelente pero no es gratis
35
« en: Sábado 7 de Febrero de 2004, 15:51 »
si pues, este codigo ya es viejo, yo no lo cree... me imagino que tendra muchos años en circulacion... solo lo comparto con ustedes
36
« en: Sábado 7 de Febrero de 2004, 15:48 »
puedes pasar el nombre de la tabla como un parametro varchar seria algo asi alter Procedure MiProcedimiento( @tableName varchar(10) ) as
declare @SqlString varchar(500)
set @SqlString = 'select Concepto, Descripcion from '+ @tableName
execute(@SqlString)
y listo
37
« en: Viernes 6 de Febrero de 2004, 15:19 »
function Bisiesto(Anio: Integer): Boolean; begin Bisiesto:= (Anio mod 4 = 0) and ((Anio mod 100 <> 0) or (Anio mod 400 = 0)); end;
salu2
38
« en: Jueves 5 de Febrero de 2004, 20:27 »
mucho mejor aun, yo recomendaria el uso de los componentes Indy para todo lo que tenga que ver con sockets, de hecho debe haber un ejemplo de un web server en Indy, checate los demos veras...
a tu pregunta "De paso aprovecho para sacarte otra pequeña duda: cual era la instruccion para hacer una pausa de x segundos??? "
Sleep(1000) //un segundo = 1000 milisegundos
39
« en: Jueves 5 de Febrero de 2004, 20:25 »
te refieres a que solo 2 usuarios puedan usar tu programa? o Windows en general?
40
« en: Jueves 5 de Febrero de 2004, 20:24 »
muy cierto, de hecho esto ultimo es lo que estoy usando en un proyectito que se me vino a la mente hace algunos dias (un robot en Delphi para que "juegue" un juego grafico), mientras yo lo observo, cuando le quiero mandar instrucciones (para detenerlo o echarlo a andar otravez), simplemente presiono una secuencia de teclas y tengo el codigo que mencionas en un Timer
41
« en: Jueves 5 de Febrero de 2004, 20:20 »
igualmente me parece igual, de hecho se ha vuelto mas y mas comun abrir esos espacios en este tipo de foros de programacion
42
« en: Jueves 29 de Enero de 2004, 23:01 »
tambien hay un conjunto de componentes que permiten utilizar python dentro de Delphi, para los que quieran agregar capacidades de scripting en sus aplicaciones, de hecho hay aplicaciones comerciales utilizando esta combinacion, se puede ejecutar codigo python desde Delphi, o Delphi desde Python utilizando estos componentes...
43
« en: Martes 20 de Enero de 2004, 18:33 »
mm... es mejor abrir un mensaje nuevo para un problema nuevo... anyway...
el problema puede estar en dos lados, en tu programa o en alguna de las unidades, el problema es que tienes el "debugging" OFF, y con esa opcion OFF pues no se puede hacer debugging
tienes en algun lado la directiva {$D-} ?
si es asi, hay que quitarla, si alguna de tus unidades fue compilada con el debugging OFF, hay que volverlas a compilar con el debugging ON
esta opcion tambien puede estar desde el menu Option, Compiler, Debugging, Debug Information (la X es ON)
44
« en: Martes 20 de Enero de 2004, 15:14 »
y estas matrices las tienes... en arreglos? o en que?
...si las tuvieras en una base de datos (como access), esto seria super sencillo
45
« en: Viernes 16 de Enero de 2004, 00:37 »
el procedimiento Seek, no creo que se pueda usar con archivos de texto, es mas bien para archivos tipeados o no tipeados (aunque se oiga raro, no tipeado seria F:File;, tipeado seria F:File of Byte), pero no para archivos de texto... el caso es que, la solucion talvez seria cerrar y volver a abrir el archivo, es la desventaja de los archivos de texto, son secuenciales y no te puedes mover de arriba a abajo
salu2
46
« en: Lunes 12 de Enero de 2004, 17:10 »
la explicacion al porque se tienen que agregar mas parentesis es simplemente porque el compilador no puede saber si lo que tu quieres decir es:
int(shape4.Top) >= int(shape3.Top)-8 and (int(shape4.Top))
debe hacer primero el "and" o el ">="? (son dos resultados muy diferentes
esa es la cuestion, por eso tienes que poner parentesis para que sea claro lo que tiene que hacer, es como en matematicas, si tu pones
5+2/3
quieres que se haga primero el "+"? o la division y luego la suma? para eso se utilizan parentesis, para hacerlo mas claro, es lo mismo en programacion
salu2
47
« en: Lunes 12 de Enero de 2004, 17:05 »
que le mandaras letras en vez de numeros, o numeros y letras combinados o simplemente un numero no valido (0.25.3, 4,01, etc...)
48
« en: Sábado 10 de Enero de 2004, 05:26 »
Hola...
BlackTigerX podrias explicar un poco este codigo que pegaste?
no entiendo ese de tmp y err, se que es par validar, pero no se pq esas dos palabras var tmp, err:Integer; begin CuentaDigitos:=0; if (Length(Cadena)=0) then Exit; Val(Cadena, tmp, err);
la funcion Val te pide la Cadena que quieres convertir, y 2 numeros, uno (tmp) que regresa el valor ya convertido a numero, y el ultimo parametro (err) regresaria un valor diferente de cero en caso de que la conversion falle (regresa la posicion donde se encontro error) si la conversion tiene exito (sin errores), la variable err devuelve cero
49
« en: Martes 6 de Enero de 2004, 19:40 »
no se que es "el juego de las cadenas"... no se de que se trata ese programa... el otro codigo lo hice asi rapido porque el dio una descripcion del programa...
50
« en: Martes 6 de Enero de 2004, 02:02 »
|
|
|