|
|
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 - DriverOp
Páginas: 1 ... 5 6 [7] 8 9
151
« en: Jueves 15 de Octubre de 2009, 22:17 »
Gracioso 
Vale, pero ponme un ejemplo de procedimiento donde te cree un archivo con la variable  Va... Como no sé cuál es la estructura de datos que utilizas para guardar los puntos haré uno ad-hoc. const NombreArch='Puntaje.dat'; type TPuntaje=record puntos: integer; nombre: string[20]; end; TArchPuntaje=File of TPuntaje; var PutajeActual: TPuntaje; procedure GuardarPuntos(Puntaje: TPuntaje); var Arch: TArchPuntaje; begin Assign(Arch,NombreArch); Rewrite(Arch); { Recrea el archivo } Write(Arch,Puntaje); Close(Arch); end; Procedure LeerPuntos(var Puntaje: TPuntaje); var Arch: TArchPuntaje; begin Assign(Arch,NombreArch); Reset(Arch); { Abre para lectura } Read(Arch,Puntaje); Close(Arch); end; begin LeerPuntos(PuntajeActual); { Lee los puntos guardados } ... { some code here... } ... GuardarPuntos(PuntajeActual); end.
Cuidado: Asumo que el archivo Puntaje.dat ya existe en el directorio actual, así que la primera vez probablemente te salte en error. Esta es una buena página para comenzar a aprender sobre manejo de archivos... o ficheros como dicen al otro lado del Atlántico  . http://mx.geocities.com/antrahxg/pascal ... hivos.html
152
« en: Jueves 15 de Octubre de 2009, 18:44 »
Genera un dato con AJAX y dale Ver Código Fuente a la página y veras que esos datos no existen. Claro, pero el navegador los saca de la nada, solo para confundir al desarrollador xD. Que no esté en el código fuente no significa que no exista. A propósito del código que has posteado: <input type='text' id='search' size='14' onkeyup='buscar(this.value, ".$_SESSION['cliente'].")'>
$_SESSION['cliente'] es una variable de PHP pero la estás incrustando en el código HTML sin más. ¿No habrás querido poner algo así?: <input type='text' id='search' size='14' onkeyup='buscar(this.value, "<?=$_SESSION['cliente']?>")'>
153
« en: Jueves 15 de Octubre de 2009, 18:38 »
Pues el sistema operativo te provee un mecanismo para hacer eso. Se llama archivo.
154
« en: Miércoles 14 de Octubre de 2009, 20:42 »
Cómo que no existe... Si el navegador te lo muestra entonces sí existe. Otra cosa es que la sintaxis sea errónea. De todas formas no entendí bien qué estás haciendo y cuál es tu problema. ¿Algún ejemplo para mostrar?.
155
« en: Miércoles 14 de Octubre de 2009, 08:09 »
Describe el formulario en cuestión.
156
« en: Miércoles 14 de Octubre de 2009, 08:08 »
Para comenzar lo mejor y más a mano está en la ayuda de TP7, busca la ayuda de la unidad Graph y todas sus funciones y procedimientos asociados.
157
« en: Sábado 10 de Octubre de 2009, 06:10 »
¿Para qué tipo de desarrollo?, es decir, ¿cuál es el proyecto que tienes en mente?.
158
« en: Jueves 8 de Octubre de 2009, 13:53 »
¿Cómo podría hacer para que este procedimiento pueda imprimir cualquier tipo de dato? No puedes. En algún momento tienes que hacer una conversión de tipos y no todos los tipos se pueden convertir a string directamente (conjuntos y tipos enumerados, por ejemplo). Yo diría que escribas otro procedimiento para imprimir números enteros y otro más para números reales.
159
« en: Viernes 2 de Octubre de 2009, 09:10 »
Me temo que tendrás que aprender a hacer un analizador sintáctico y semántico. Lo que pretendes no es moco de pavo. Nada menos que hacer el intérprete de un lenguaje.
160
« en: Viernes 4 de Septiembre de 2009, 05:16 »
muchas gracias lair
pero en donde la puedo descargar y ver algnos ejemplo? si puedes contestame pero tambien estre buscando haber si la encuentro
gracias  http://www.fpdf.org/
161
« en: Miércoles 2 de Septiembre de 2009, 14:31 »
hola nesesito hacer para la facultad un algoritmo que rellene un vector A de 40 elementos con numeros consecutivos a partir de un numero M ingresado por teclado y luego mostrar cada posicion del vector con su valor y me da un error en la compilacion pero no entiendo cual es. si alguien encuentra el error le agradeceria que me lo diga.
esto fue lo que hice. Bien, no dices qué compilador estás usando, asumiré que es Turbo Pascal, entonces... [pascal:6ja68gjt] - program vector;
-
- uses wincrt; { <--- wincrt no existe en Turbo Pascal, has querido usar crt }
-
[/pascal:6ja68gjt] [pascal:6ja68gjt] - for i:= 2 to 40 do
- m:=m+1; { <--- este for solo ejecuta hasta acá }
- vector_a[i]:=m;
- end { <--- por lo tanto este end está de más }
-
[/pascal:6ja68gjt] Has olvidado poner un begin inmediatamente después del for. Recuerda que si un ciclo for debe ejecutar más de una sentencia entonces todas las sentencias tienen que estar dentro de un bloque begin... end; así: [pascal:6ja68gjt] -
- for i:= 2 to 40 do
- begin
- m:=m+1;
- vector_a[i]:=m;
- end;
-
[/pascal:6ja68gjt] También recuerda que las sentencias terminan con punto y coma. [pascal:6ja68gjt] - for i:=1 to 40 do {es en esta linea donde me da el error}
- writeln('la posicion es: ' i ' el valor es: ' vector[i] );
- end { <--- este end está de más }
-
[/pascal:6ja68gjt] Tal como dije recién, si el for solo ejecutará una sentencia no es necesario encerrar esa sentencia con begin... end. La regla es "para cada begin debe corresponderle un end" excepto en la sentencia case, que lleva end pero no begin. Un saludo.
162
« en: Lunes 31 de Agosto de 2009, 16:12 »
Pon unas cuantas llamadas a [php:15c1gif0] [/php:15c1gif0] En lugares clave para que sepas qué está pasando con las sesiones.
163
« en: Viernes 28 de Agosto de 2009, 03:16 »
tengo un TEdit al que he llamado edit1 (que poco original XD). En el solo escribo un numero que quiero que lea. Lo he hecho de esta forma:
numero:=edit1.Text; {Para que me guarde en la variable numero lo que he puesto en edit1}
es correcto?¿? Todo bien pero ¿de qué tipo es "numero"?, porque si es string, está bien, pero si es integer entonces no, tienes que hacer una conversión de tipo pero antes debes asegurarte que Edti1.Text contiene un string que pueda ser convertido a integer: var numero: integer; begin ... try numero:=StrToInt(Edit1.Text); except ShowMessage(Edit1.Text+" no es un número."); end; // try ... end;
Alternativamente en vez de usar un TEdit común puedes usar un Edit "especializado" que solo acepte números. Una de las ventajas de Delphi es que puedes hacer tus propios componentes (o agregar hechos por otros) derivados de los ya existentes, si es que sabes programación orientada a objetos eso se llama "derivar una clase de otra". De hecho en mi página personal tengo un derivado de TEdit, el TEditReal, que hace exactamente eso, solo acepta números (enteros o reales) que puedes descargar y agregar a la paleta de componentes de Delphi. Y una cosa mas, hay algun equivalente en delphi (o algo parecido) al writeln de Pascal?¿? Sí y no. Sí porque existe ese procedimiento en Delphi, no porque solo sirve para escribir en archivos de texto (tipos TextFile). Si quieres mostrar un mensaje rápido usa ShowMessage() como en el código de ejemplo que puse más arriba. Saludos.
164
« en: Viernes 28 de Agosto de 2009, 03:04 »
1. IF ( $resultado ==True) 2. { 3. ?> 4. 5. <script language="javascript" type="text/javascript"> 6. alert("Se ha grabado un nuevo cliente" ); 7. location.href='formulario.php'; 8. </script> 9. 10. <?php 11. }
Faltaba un punto y coma al final 
165
« en: Viernes 28 de Agosto de 2009, 02:59 »
Gracias! De nada Mis disculpas. Pense que al ser de Delphi.. en fin pensé que más post serian molestos  me van surgiendo dudas de diferentes tipos... Por el contrario, amigo. Es mejor cuando cada tema tiene un tema específico porque así el visitante ocasional puede ver en la lista si su duda o interés está allí, de lo contrario tendría que navegar página tras página si los temas estuvieran mezclados en un solo tema. Un saludo.
166
« en: Jueves 27 de Agosto de 2009, 09:28 »
Deberías haber creado un tema nuevo en el foro porque esta pregunta no tiene nada que ver con la original. Pues nada, a lo nuestro: var registro:TRegistro; f:file of TRegistro; begin AssignFile (f,'fichero.fic'); Reset (f); while not EOF(f) do begin Read (f,registro.campo1); campoAuxiliar:=registro.campo1; {Aqui, seria correcto: campoAuxiliar:=campo1; ???} Read (f,registro.campo2); campoAuxiliar2:=registro.campo2; end;
Esta correcto?¿? Es que las instrucciones read creo que no están bien. He googleado pero no he visto ejemplos con registros de forma clara.
Pues no, no es así. Read() cuando lee un archivo con tipo lee un registro completo y no "campo a campo". Y luego de cada lectura avanza el puntero al siguiente registro, estonces según tu código deberías hacer: var registro:TRegistro; f:file of TRegistro; begin AssignFile (f,'fichero.fic'); Reset (f); while not EOF(f) do begin Read (f,registro); campoAuxiliar:=registro.campo1; { siempre y cuando campoAuxiliar sea del mismo tipo que .campo1 } campoAuxiliar2:=registro.campo2; { idem anterior } end; // while CloseFile(f); { no es educado dejar la puerta abierta cuando te marchas :D } end;
Saludos.
167
« en: Miércoles 26 de Agosto de 2009, 01:17 »
No lo he probado pero supongo que habrá alguna diferencia en el rendimiento (las cosas que he hecho en MySQL / SQL Server son muy "livianitas"). Sin embargo de lo que sí he probado es que MySQL es más cómodo de instalar (unos cuantos megas de MySQL a 200 megas SQL Server) y es multiplataforma (SQL Server solo viene para Windows). Eso es lo que yo puedo aportar por ahora.
168
« en: Domingo 23 de Agosto de 2009, 05:34 »
Pues tocará buscar en la ayuda de la clase TCanvas. Me parece que sí hay algo así pero mejor checalo tú que eres quien sabe qué es lo que necesitas.
169
« en: Viernes 21 de Agosto de 2009, 23:30 »
Bueno, acá sí necesito algo de código para mirar. Pues lo que me has dicho no me sugiere ninguna solución al problema. De hecho no estoy seguro que haya un problema en primer lugar pero igual, necesito ver algo de código. Pon el código de los for relevantes (los que dices que se paran), quitando todo lo que te parezca irrelevante.
170
« en: Jueves 20 de Agosto de 2009, 21:13 »
Disculpa, ¿qué estás intentando hacer?, porque hay que ser muy caballo para provocar un overflow en Delphi  (y lo digo con todo respeto). Quizás tu idea es buena pero la implementación que intentas hacer es errónea. Muéstranos algo de código para ver qué está pasando y una explicación del algoritmo en cuestión.
171
« en: Miércoles 19 de Agosto de 2009, 20:11 »
No dices si usas un TADOConnection, si es así, debes tener la propiedad LoginPrompt en false. Por otro lado dices que usas un Query ¿de BDE o de ADO?. El "query" de ADO se llama TADOQuery y debe estar conectado al TADOConnection (connection:=ADOConnection1; por ejemplo).
172
« en: Viernes 14 de Agosto de 2009, 20:44 »
Por lo que me dices cada vez estoy más convencido de que el "problema" es el ancho de banda de la red. Eso es todo.
173
« en: Jueves 13 de Agosto de 2009, 22:21 »
Porque el cuello de botella es el cable de red. De nada sirve tener máquinas potentes en ambos extremos de la red si la conexión es "lenta".
Ahora me asalta la pregunta ¿qué tipo de proceso estás haciendo que insume tanto tiempo?.
174
« en: Miércoles 12 de Agosto de 2009, 23:46 »
Por lo que entiendo la impresión sale en la impresora que está conectada a la máquina donde se ejecuta el servidor web, no en la máquina del cliente.
Pues para mí tendrías que ver si esa clase tiene algún método que te devuelva una lista con todas las impresoras instaladas en el servidor. Con ese dato ya puedes hacer lo que quieres.
175
« en: Lunes 10 de Agosto de 2009, 22:07 »
Aparentemente el compilador no puede encontrar una unit estandar, supongo que es porque el PATH de búsqueda de bibliotecas está mal configurado. No tengo Lazarus a mano ahora mismo pero podrías verificar esto en el menú de configuración.
El archivo .lpr al que haces referencia se crea automáticamente con cada nuevo proyecto. Ese archivo es el archivo principal. Como podrás notar cuando programas lo haces sobre un .pas que es una Unit, no el programa principal.
Páginas: 1 ... 5 6 [7] 8 9
|
|
|
Mostrar Mensajes
