Preguntas con la etiqueta [pascal]

Pascal es un lenguaje imperativo creado por Niklaus Wirth en 1969. Fue ampliamente usado en enseñanza y desarrollos en las décadas de 1970 y 1980.

Filtrar por
Ordenado por
Etiquetadas con
0 votos
1 respuesta
47 vistas

Error con condicional en pascal

el error que tengo en mi programa es el siguiente, quiero crear un programa en el cual el usuario digite numeros del 1 al 7 pero tambien necesito establecer una condicion, la cual es que si el usuario ...
Avatar del usuario Agustin Lyon
2 votos
1 respuesta
250 vistas

Error de sintaxis en Free Pascal

Estoy tratando de hacer un programa sencillo en Free Pascal pero me 2 errores de sintaxis Program par_impar; begin writeln Begin write ('Introducir el valor') IfMod2=0 then write ('El numero ...
Avatar del usuario Albert Camejo II
0 votos
1 respuesta
49 vistas

¿Cómo crear un archivo que almacene los atributos de un objeto? [cerrada]

Existe algún identificador reservado como FILE OF de pascal en java, para crear archivos de una estructura.
Avatar del usuario Luis Alberto
0 votos
1 respuesta
61 vistas

Cómo obtener horas de encendido de un Disco Duro en Delphi

Pudieran Ayudarme a Obtener las Horas de encendido que pueda tener un Disco Duro de nuesta PC,progragmaticamente en Delphi, Digamos por ejemplo del Disco 0 o 'C' Ayuda !!!
Avatar del usuario Juan Carlos Cuellar
2 votos
1 respuesta
821 vistas

Refrescar grid y pintar

estoy intentado refrescar un grid al cual darle doble click me actualice el color de unas determinadas filas. Por ejemplo,en este caso lo que hago es doble click en el grid y lo recorro y el valor ...
Avatar del usuario Roman345
  • 451
1 voto
1 respuesta
87 vistas

Como modificar un campo de un adoquery desde otro formulario

Tengo un formulario que tiene un TAdoQuery llamado qyPatientContact y quiero al campo qyPatientContactNote modificarlo desde otro formulario. Estoy intentando con esto: TfmMdPatientContacts....
Avatar del usuario Raidel Fonseca
1 voto
1 respuesta
487 vistas

Como mostrar un texto con formato en un richedit

Al guardar un texto enriquecido en la BD sql server lo hace OK, se guarda lo siguiente: {\rtf1\fbidis\ansi\ansicpg0\uc1\deff0\deflang0\deflangfe0{\fonttbl{\f0\fnil Arial;}}{\colortbl;\red0\green0\...
Avatar del usuario Raidel Fonseca
0 votos
1 respuesta
136 vistas

como actualizar Adoquery AfterDelete

Tengo la siguiente consulta: Select A.*, B.GroupName as PanelName From ehrPatientTestOrders A Left Outer Join VW_ehrTestPanels B On Coalesce(A.PanelCode, '') = B.Code Where A.PatientCode = '...
Avatar del usuario Raidel Fonseca
2 votos
1 respuesta
183 vistas

Como mantener las filas seleccionadas despues de cerrar y abrir la query

Intento guardar el bookmark la lista de bookmark antes de cerrar la query pero al ejecutar el codigo cuando obtengo la lista esta ok, cuando cierro la query y la abro otra vez y voy a restaurar los ...
Avatar del usuario Raidel Fonseca
0 votos
1 respuesta
2k vistas

Números primos en Pascal

Muy buenas, hace un par de meses me pusieron una práctica en mi universidad que trataba sobre hallar los primeros n numeros primos. Tenía habilitado Mooshak para ver si el código era eficiente y ...
Avatar del usuario Ángel
  • 13
1 voto
1 respuesta
2k vistas

¿Cómo Seleccionar una fila de un dbGrid mediante una posición?

Estoy intentando seleccionar por código la fila de un DbGrid dada una posición, he intentado con esto pero no lo hace, ¿alguien tiene alguna sugerencia? HelpGrid.SelectedIndex := ListPosRows[I];
Avatar del usuario Raidel Fonseca
1 voto
1 respuesta
78 vistas

¿Cómo extraigo datos de una página web con una programa de consola Pascal? [cerrada]

Bueno básicamente lo que estoy tratando de hacer es poder acedera una página web ejemplo https://telegra.ph/Ejemplo-para-Stack-Overflow-05-15 Y sacar de allí información para guardarla en unas ...
Avatar del usuario Josqui00
1 voto
0 respuestas
163 vistas

¿Como solucionar error de conexión de TZConnection para conectar con una base de datos?

Tengo Lazarus 1.7 + Zeos + wampserver 3.1.7. Cuando intento conectar mi TZConnection con la base de datos en MySql, me sale este mensaje de error: no se puede encontrar ninguna de las bibliotecas ...
Avatar del usuario M Angel ambrose
0 votos
2 respuestas
889 vistas

¿Cuándo es correcto guardar datos numéricos en un variable string?

Hace tiempo escuche por los pasillos de la universidad que las bases de datos trabajaban más rápido con las variables de tipo cadena entonces me surgió la siguiente pregunta: ¿Cuándo es correcto ...
Avatar del usuario Josqui00
0 votos
0 respuestas
639 vistas

¿Cómo sumar dígitos en pascal?

program eje10p3; var CONT,dig,suma:integer; procedure leerentero(var n:integer); begin read(n); cont:=cont+1; suma:=0; while (n div 10 <> 0) do begin CONT:=CONT+1; dig:=n mod 10; n:=n div ...
Avatar del usuario MatiST00
  • 101
1 voto
1 respuesta
85 vistas

¿Cómo guardar minimo entero de un "precio" en pascal?

Tengo que guardar un "código" del "precio" mas barato en un programa de pascal, la cosa es que el profesor sabía menos que yo, y no lo probó el programa que hice, solo lo leyó y me dijo que estaba ...
Avatar del usuario MatiPHP
  • 167
0 votos
1 respuesta
89 vistas

Informar menor código del total en pascal

tengo un ejercicio en Pascal: Realizar un programa que lea información de 200 productos de un supermercado. De cada producto se lee código y precio (cada código es un número entre 1 y 200). ...
Avatar del usuario MatiPHP
  • 167
0 votos
1 respuesta
270 vistas

¿Como se hace una multilista en pascal?

He declarado así la multilista pero no creo que esté bien ¿Alguien por aquí sabe algo de pascal? (Se que esta obsoleto, pero es lo que nos enseñan el la facultad...) type tManager=record ...
Avatar del usuario thejuanvisu
0 votos
1 respuesta
65 vistas

Problema en PASCAL, no informa lo que debería

estoy haciendo unos ejercicios en pascal, dice así: programa que lea el número de legajo y el promedio de cada alumno de la facultad. La lectura finaliza cuando se ingresa el legajo -1, que no ...
Avatar del usuario MatiPHP
  • 167
3 votos
2 respuestas
271 vistas

Dividir byte en 8 bits en delphi

quiero con un byte tratar los días de la semana, es decir que: Lunes -> 1bit Martes ->1bit Miercoles ->1bit Jueves ->1bit Viernes ->1bit Sabado ->1bit Domingo ->1bit Todos ->...
Avatar del usuario Roman345
  • 451
1 voto
1 respuesta
203 vistas

¿Qué significa este error de RUNTIME ERROR?

estoy realizando una pantalla y cuando lo ejecuto me aparece el siguiente error, sin embargo, al darle a continuar y guardar almacena la información en la base de datos. ¿Cómo hago para quitar ese ...
Avatar del usuario Ambar Vegas
2 votos
2 respuestas
1k vistas

¿Cómo capturo el valor de un TMemo en Delphi?

Tengo una pantalla con 2 botones y quiero capturar el valor que un usuario ingrese en el formulario tal como lo pudiera hacer si tuviese un Edit.Text, ¿cómo lo hago? Por ejemplo aquí si funciona: ...
Avatar del usuario Ambar Vegas
0 votos
0 respuestas
93 vistas

Como cargar una Imagen en delphi salvada desde c#

tengo una aplicacion en .net mvc y estoy tratando de guardar una imagen en un campo de la Base de datos, esto lo hace bien, el problema es que esta imagen posteriormente sera leida desde una ...
Avatar del usuario Raidel Fonseca
1 voto
0 respuestas
68 vistas

Encriptacion AES en PASCAL con INNO SETUP

Encriptación AES en PASCAL con INNO SETUP. ¿Alguna forma de implementación o consejo? Gracias. Tengo este código, que genera una clave aleatoria, necesito guardar esa clave encriptada con AES, en una ...
Avatar del usuario Ruben Martinez Gutierrez
2 votos
1 respuesta
366 vistas

como consumir dll delphi en c#

tengo una function de delphi que la exporto como dll, aqui dejo mi codigo: library MdEncDec; uses System.SysUtils, System.Classes, Bcrypt; {$R *.res} function EncryptWord( value: PChar ): ...
Avatar del usuario Raidel Fonseca
2 votos
2 respuestas
2k vistas

Syntax Error ; expected but else found (Pascal)

Estoy tratando de hacer anidamientos de if en Pascal, pero en todos los programas que trato de hacer me sale el mismo error Syntax Error ; expected but else found Por ejemplo program temperatura; ...
Avatar del usuario Raul
  • 21
-1 votos
1 respuesta
138 vistas

problemas de compilación en PASCAL

Tengo problemas en la compilación en Pascal. En la imagen se aprecia la descripción del error; pero como nunca había programado en este lenguaje, me cuesta entender el error. Si alguien me puede ...
Avatar del usuario ocich93
  • 95
0 votos
1 respuesta
149 vistas

¿Cómo crear un módulo que cambie dos valores en un vector? Pascal

Me gustaría saber como cambiar el valor de una variable por otra alojada en el mismo vector. Ej: Vector pos1:4 pos2:5 pos3:6 pos4:7 pos5:8 pos6:9 pos7:10 pos8:11 pos9:12 pos10:13 ...
Avatar del usuario ivan_sauer
0 votos
1 respuesta
33 vistas

Nan en Pascal al trabajar con valores de una matriz

Estoy desarrollando un programa en Pascal que coge un matriz y le va asignando a cada casilla la media de las 4 casiilas adyacentes durante n repeticiones. for contador:= 1 to itera do begin for ...
Avatar del usuario PABLO FERNANDEZ
3 votos
1 respuesta
259 vistas

Crear un componente en FireMonkey

Bueno espero si es posible que me ayuden. Hace tiempo vengo usando un componente que realice en VCL para delphi 2010 que consta de un rectángulo que cambia de color según tres estados como se muestra ...
Avatar del usuario J. Ramos
-2 votos
1 respuesta
38 vistas

Error de compilación: final extra

Quiero hacer una calculadora para la universidad, que me permita elegir qué es lo que quiero hacer, pero no funciona. Quiero compilar y me sale que tengo un final extra. ¿Alguien me podría ayudar? ...
Avatar del usuario Francisco Javier Ojopi Abrego
0 votos
1 respuesta
2k vistas

Calcular notas en pascal, lazarus

Después de ingresar 6 notas, obtener el promedio de las tres mejores. Mostrar el mensaje “Aprobado” si el promedio es mayor o igual a 3,5 ; caso contario, mostrar “Desaprobado” . Que debo de ...
Avatar del usuario Andrews451
0 votos
1 respuesta
46 vistas

Utilizar Pascal en GNU Emacs 25 (GUI) -- Ubuntu [cerrada]

Tengo instalado GNU Emacs en Ubuntu 17.10, y me gustaría saber si puedo utlizarlo para trabajar con Pascal, ya que el famoso "fondo azul" me resulta muy incomodo para trabajar.
Avatar del usuario Carlos
  • 357
1 voto
1 respuesta
2k vistas

Como Instalar Pascal en Ubuntu 17.10

¿Que IDE puedo utilizar para programar en pascal con Ubuntu? ¿Que comandos utilizo para instalarlo, o instalador? Tengo la versión 17.10. Y, si se puede, me pueden también indicar un manual o libro ...
Avatar del usuario Carlos
  • 357
0 votos
0 respuestas
48 vistas

Me dice que la variable no se esta iniciando

Estoy compilando un programa para clase, que tiene que mostrar de los datos que yo le introduzca el caracol ganador. program Entregable2; type //Definir tipos de datos tiempo = record ...
Avatar del usuario EdgeExe
0 votos
1 respuesta
222 vistas

función en pascal que te devuelva una matriz

quiero que la función me devuelva una matriz pero me da error en el tipo de dato program proyecto4; type Matriz = array[0..7,0..7] of integer; var tableroajedrez:Matriz; i,j,k: integer; ...
Avatar del usuario Efrainrodc
3 votos
0 respuestas
273 vistas

¿Cómo medir el tiempo de ejecución en nanosegundos?

He desarrollado un programa para medir el rendimiento de la ALU y la FPU en Pascal, lo que hace es leer un archivo con 30.000 números, meterlos en un arreglo y luego ordenarlos por el método de la ...
Avatar del usuario carlosmarioes
0 votos
2 respuestas
3k vistas

¿Como crear un menú de opciones en Pascal?

soy Jose Rangel. Soy estudiante de Ing. Sistemas, estoy comenzando a ver programación y el primer lenguaje con que hemos iniciado es con Pascal. Como bien dice el titulo, quisiera saber como puedo ...
Avatar del usuario Ranzhel235
1 voto
1 respuesta
230 vistas

¿Cómo crear una página de opciones en Inno Setup?

Necesito crear una página para mi instalador que contenga radio buttons con las opciones de: Instalar Reparar Desinstalar Soy completamente nuevo en Inno Setup les agradecería sus respuestas muchas ...
Avatar del usuario Angel Montes de Oca
2 votos
1 respuesta
302 vistas

Problema con Procedure y Case

Quiero hacer un menú, es para un juego, para probar el case y procedure, pero no funciona. Este es el código: Program Juego; uses crt; Procedure Menu; var op:integer; begin Writeln ('Seleccione ...
Avatar del usuario Enzo
  • 21
1 voto
1 respuesta
226 vistas

Ayuda con listas en pascal

Procedure Remove(minQuantity:integer; VAR storage: tList); var p:tPosL; d:tItem; counter:integer; begin p:=first(storage); counter:=0; writeln(...
Avatar del usuario Poli Fack
3 votos
1 respuesta
107 vistas

Como ver si un puerto esta en uso en Inno Setup?

En mi instalador creado con Inno Setup fue necesario comprobar la disponibilidad de un puerto para instalar y montar un servicio MySQL, ya que si el puerto esta en uso es necesario cambiarlo.
Avatar del usuario Angel Montes de Oca
1 voto
1 respuesta
244 vistas

Hacer una consulta MySQL desde Inno Setup

Estoy haciendo un instalador, el cual necesita mandar una consulta al final de la instalación y después de montar el servicio sMySQL. No tengo idea de cómo se realiza, esto sería en la sección de CODE ...
Avatar del usuario Angel Montes de Oca
0 votos
1 respuesta
338 vistas

Lista Doble en Pascal

Estoy haciendo un ejercicio de listas. El ejercicio me pide crear una lista doble de enteros. Me esta costando hacerlo y creo que lo hice mal. Leo los enteros de un archivo armando una lista comun y ...
Avatar del usuario Lara Cesio
0 votos
1 respuesta
67 vistas

Evitar duplicados en list box (Inno Setup)

Recibo un xml de internet, el cual contiene paises y monedas que pueden variar, despues lo cargo a un "List Box 1" y con los botones en pantalla los agrego o quito del "List Box 2" aqui esta una ...
Avatar del usuario Angel Montes de Oca
2 votos
2 respuestas
428 vistas

Orden de caracteres en Free Pascal

En Pascal los tipo char están ordenados, y no se cuál es ese orden. Por ejemplo, si tengo el dígito 5 y quiero hacer que tome el valor del entero 5 hago ord('5')? ¿Pero tiene ese valor o es otro ? ¿...
Avatar del usuario Pascal101
1 voto
1 respuesta
82 vistas

Puntero a la k-ésima celda dentro de lista

Me dan un natural k > 0, y tengo que retornar un puntero a la k-ésima celda de una lista dada. Si la k-ésima celda no existe retorna nil. Esto es lo que estoy intentando: function largo(l : ...
Avatar del usuario ro2
  • 23
-1 votos
2 respuestas
490 vistas

¿Por qué no se realiza la Matriz Traspuesta? (Free Pascal)

Estoy haciendo un programa para el que necesito un subprograma que me calcule la matriz traspuesta de una matriz cualquiera. No entiendo qué parte del código esta mal. Compila pero me devuelve la ...
Avatar del usuario Pascal101
0 votos
1 respuesta
526 vistas

Como compilar en sublime text 3 usando FPC 3.0 LINUX (Ubuntu)

Me interesa saber el código al crear una nueva build system, para compilar en con Free Pascal usando linux, o en simples palabras cómo configurar Sublime Text para compilar archivos .pas en linux.
Avatar del usuario Cookie Rabbit
2 votos
1 respuesta
809 vistas

¿Los arreglos son basados en 0 o en 1 en Delphi/Pascal?

Quiero hacer un arreglo en Delphi. He encontrado una solución con este código: var arr: array of String; Cada vez que agrego algo, lo hago de esta forma: var Form1: TForm1; var arr : array of ...
Avatar del usuario jachguate
  • 30.5k