PREGUNTAS CONTESTADAS - Delphi

Hay un total de 680 Preguntas.

<< >>

Pregunta:	4023 - CAMBIAR LA RESOLUCION DEL MONITOR
Autor:	Ricardo Sanchez
Quisiera saber como se cambia la resolución del monitor (640x480, 1024x768, etc) desde Delphi 4 en Windows

Respuesta:

Dairo Osorio González

Crea un nuevo proyecto en delphi.

Y reemplaza el codigo de la forma por este:

Suerte

********************
unit Unit1;

interface

uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls;

type
TForm1 = class(TForm)
Button1: TButton;
Button2: TButton;
Button3: TButton;
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
procedure Button3Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;
modonuevo,ModoOriginal: TDevMode;

implementation

{$R *.DFM}

procedure TForm1.Button1Click(Sender: TObject);
begin
EnumDisplaySettings(´\\.\Display1´, Cardinal(-1), ModoOriginal);
ShowMessage(IntToStr(ModoOriginal.dmPelsWidth)+´x´+IntToStr(ModoOriginal.dmPelsHeight));
modonuevo:=modooriginal;
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
modonuevo.dmPelsWidth:=640;
modonuevo.dmPelsHeight:=480;
ChangeDisplaySettings(Modonuevo,0);
end;

procedure TForm1.Button3Click(Sender: TObject);
begin
modonuevo.dmPelsWidth:=800;
modonuevo.dmPelsHeight:=600;
ChangeDisplaySettings(Modonuevo,0);
end;

end.

Contestar

Pregunta:	4024 - PANTALLA COMPLETA
Autor:	Ricardo Sanchez
Es posible solicitar al sistema operativo (Windows) que una aplicación corra en pantalla completa desde Delphi 4? Si es así, quisiera saber como... Gracias

Respuesta:	A R Castillo
Que te parece construyendo (ya sea con antelación o dinámicamente) un archivo PIF con esa información??? Yo no he trabajado con PIF dinámicos, pero si he visto en la red esta clase de tareas!!! Espero haberte ayudado

Contestar

Pregunta:	4064 - COMO ELIMINAR MENSAJES PROPIOS DE DEPHI SI UTILIZO EXCEP.
Autor:	RUBEN DARIO GONZALEZ
Estoy manejando Exceptiones en Dephip cuando grabo un registro me despliega un mensaje propio de delphi que la llave ya existe yo quiero definir mi propio mensaje, el sistema me lo despliega el mensaje popio de delphi, y luego le digo continuar me despliega el mensaje propio que defini, como configuro que no me salga el mensaje que tiene dephi.

Respuesta:

José Oronas

No se como capturaras la excepcion de duplicacion de llave, pero podria ser .....
Table1.insert ;
.
.
.
Try
Table1.post ;
Except
// Mesaje personalizado ;
Table1.Cancel ;
End ;

Si lo haces en el evento OnPostError .......

procedure TForm1.Table1PostError(DataSet: TDataSet;
E: EDatabaseError; var Action: TDataAction);
begin
// Emitir mensaje de error personalizado
.
.
.
// Para que no se despliege el emensaje estandar
Action := daAbort ;
end;

Contestar

Pregunta:	4090 - PUERTO PARALELO
Autor:	Luis Guillermo Castillo Farfán
Buenas noches Versión Delphi 4.0, estoy tratando de manipular el puerto paralelo pero hasta el momento no he encontrado la instrucción (s) que me permita enviar datos al puerto paralelo. Le agradezco si me pueden colaborar, gracias de antemano.

Respuesta:

Roberto Morales

lo mas facil es
.
.
.
asm
mov dx,0378h
mov al,11110000b
out dx,al
end;
0378 es el puerto, puede variar con respecto a cada maquina pero lo puedes ver en el panel de control(esta en hexadecimal)

el valor binario 11110000b es un valor binario, el cual indica cual pin encender(puedes modificarlo a tu gusto para encender los pines que desees), en este caso estoy encendiendo desde el pin 2 al pin 5, porque?, el pin 1 es el strob y el pin 18-25 son tierra, puedes probarlo conectando un led entre los pines 2-5 y cualquiera de las tierras.

Respuesta:	José Luis Freire
Depende de lo que quieras no hacen falta componentes. Ya sabes que el puerto funciona como un fichero, solo tienes que asignarlo. Por ejemplo, para enviar a la impresora en paralelo: procedure TForm1.Button1Click(Sender: TObject); var Impresora:TextFile; begin with printer do begin AssignPrn(Impresora); Rewrite(Impresora); WriteLn(Impresora,´Hola´); CloseFile(Impresora) end; end;

Respuesta:

Rafael Monterroza

Bueno, te cuento que en la internet existen muchísimos componentes que encapsulan el funcionamiento del puerto paralelo. Así que te recomiendo que vayas a algún sitio de la red donde se consigan componentes para delphi y bajes alguno. Por lo general se encuentran en las secciones de comunicaciones. Algunos sitios son:

www.softseek.com/programming/
www.clubdelphi.com
www.winfiles.com

otra manera es que te suscribas a los newsgroups de borland, a los ThirdParty tools de delphi.

el servidor de news de borland es newsgroups.borland.com

Espero encuentres tu componente.

Rafael.

Contestar

Pregunta:	4179 - DRIVER 16BITS PARA MICROSOFT SQL
Autor:	Arnaldo Freyre
Por favor les agradecere si me dicen como conseguir un driver de 16 bits para conectarme a microsoft sql server desde delphi 1

Respuesta:	Ernesto Cullen
Tienes que conseguir el SQLLinks para Delphi1. Borland lo vendia en su momento, no se si todavia seguira en carrera.

Contestar

Pregunta:	4310 - REFRESCAR QUICKREPORT
Autor:	pepe
Hola, mi consulta es la siguiente, cómo puedo refrescar los datos de mi QuickReport, es decir, al ingresar datos en mi programa estos salgan de inmediato en la impresión, ya que ahora no me resulta, ingreso datos pero el reporte que igual, tengo que cerrar el programa y ejecutarlo de nuevo para que se actualize el reporte, pero esa no es la idea del programa, de antemano muchas gracias.

Respuesta:

Hugo Ortega H.

Hola...

Si tu el datasource de tu reporte es una tabla, entonces supongo que cuando modificas la tabla quieres desplegar el reporte... entonces dale un refresh a la tabla antes de darle el preview al reporte... de igual manera, si el datasource es una consulta, cierrala y abrela antes del preview...

ahora, si no te funciona lo anterior o no es tu caso, puedes intentar crear el reporte dinamicamente antes de visualizarlo.... para ello, pon la forma que contiene tu reporte como available (Project/Options/Forms)... y antes de visualizarlo crealo de manera dinamica:

frmTuFormaConElReporte := TfrmTuFormaConElReporte.Create(self);

frmTuFormaConElReporte.TuReporte.Preview;

frmTuFormaConElReporte.Release;

con eso deberia de funcionar...

si no me explique o crees que no comprendí tu pregunta, puedes escribirme....

EOF

Contestar

Pregunta:	4355 - COMPONENTES
Autor:	Cristian Buezas
Quisiera saber cuales son los pasos para instalar componentes en Delphi 4.0, porque hasta ahora solo logro dolores de cabeza porque no entiendo nada. He bajado de internet varios componentes pero no me doy maña para ponerlos en la paleta de componentes. Por favor si alguien sabe que me de una mano.

Respuesta:

José Oronas

Hola
Ante todo debes tenes todos los archivos que forman el componente, generalmente los .pas .dcr .dcu
Si solo tenes .dcu y no los .pas necesariamente deben estar compilados para la version de Delphi a la que queres adicionar el componente.

Si el componente no tiene un .DPK incluido
------------------------------------------
Copias los archivos en un directorio que figure en "Library Path"
(Tools -> Environment Options -> Library -> Library Path)
o en uno nuevo y lo adicionas alli, porque si no vas a obtener un error de archivo no encontrado en el momento de adicionar el componente.
Despues vas a Component -> Install Component y en Unit File Name pones el archivo .Pas o .Dcu del componente y aceptas, te va a pedir seguramente de compilar el pakage donde incluiste el nuevo componente, esto deberia ser duficiente para instalarlo.

Si el Componente tiene un .DPK
------------------------------
Abri el .DPK de la misma forma que caulquier archivo y en la ventanita que te va a aparecer pedis instalar.
Tambien en este caso el directorio donde estan los archivos debe figurar en el Library Path.
La operacion va a generar un archivo .bpl, este archivo debe ir a parar a un directorio que figure en la variable de entorno "Path".
el sitio donde se va a escribir este archivo lo podes fijar desde el mismo lugar que el Library Path, pero desde el Combo titulado "BPL OutPut directory".

Espero que te sea útil.
Saludos.

Contestar

Pregunta:	4366 - JUEGO EN RED POR "IP"
Autor:	sebastian ruz
hola amigo delphi. Necesito tu ayuda, tengo que crear un juego en red como maximo 4 usuarios, con tipologia bus, ya que es mediante "ip" (internet) no tengo la menor idea de como crear este juego. se que necesito un programa servidor y un programa cliente, como creo la comunicacion entre estos computadores. si sabes algo hacemelo llegar. gracias

Respuesta:

Fernando22

Podrias o bien usar los componentes de sock de Delphi o realizar llamadas a la API sock de windows, este ultimo metodo es el mas rapido.

Harias un server que mantendria los datos minimos necesarios para cada cliente, info de sincronizacion, actualizacion de posiciones etc.
depende del juego y que obviamente envie la informacion de cada cliente. Estos se encargarian de redibujar y posicionar cada uno de los demas participantes en cada maquina local.

--------<SERVER>-----------
/ / \ (sock API) \
/ / \ \
<CLIENTE1> <CLIENTE2> <CLIENTE3> <CLIENTE4>

Contestar

Pregunta:	4417 - CREAR UNA CONSULTA MEDIANTE SQL CON INTERFAZ DELPHI
Autor:	mary flores velasquez
Hola amigos espero que me ayuden mi problema es tengo que crear una consulta en sql pero al utilizar query no puedo crearla bueno se podria con sql builder que es de query pero como ejecutarla al tiempo de que corra mi pregunta o conocen algun otro componente que me ayude gracias eternamente agradecida

Respuesta:

Hugo Ortega H.

Hola ...

tu pregunta no me quedo muy clara, si estoy mal en lo que te entendi puedes escribirme si quieres para corregirme... bueno, segun esto, hiciste una consulta en el sql builder que si funcionaba, pero al momento de utilizarla en tu programa en un componente TQuery ya no funcionó... bueno, primero que nada me gustaria saber que mensaje de error te regresa BDE, para conocer donde esta el error... ahora que si no te envia ninguna mensaje, me gustaria saber exactamente la manera en que estas utilizando TQuery....

bueno, desafortunadamente no puedo decirte mas porque no se mas detalles de tu problema, pero con mucho gusto te ayudo en lo que pueda...

EOF

Contestar

Pregunta:	4443 - CONVERSIÓN DE STRING A CHAR
Autor:	Alberto Osuna Núñez
Como puedo convertir un dato String a un tipo Char y viseversa? Por su ayuda, gracias.

Respuesta:	qDevelop2000
Delphi 16: function StringToPChar(var S: string): PChar; var L: Cardinal; begin L := Length(S); Move(S[1],S[0],L); S[L] := #0; result := @S[0]; end; Delphi 32: function StringToPChar(var S: string): PChar; var pec : array[0..255] of Char; begin Result := strPCopy(pec, s); end;

Respuesta:	José L. Freire
Teniendo en cuenta que un Char solo puede contener un caracter, es directo: De Char a String: var c:char; s:string; begin c:=´a´; s:=c; end Y a la inversa también. s:=´Hola´; c:=s[1];

Contestar

|< << 8 9 10 11 12 13 14 15 16 17 18 >> >|