PREGUNTAS CONTESTADAS - Delphi≤nguaje=

Hay un total de 680 Preguntas.

<< >>

Pregunta:	34950 - FALLO CONEXION ORACLE-DELPHI
Autor:	EDDISON FERNANDO BARON PEDRAZA
¿MANEJO UN SISTEMA OPERATIVO DE WINDOWS MILENIO, TENGO INSTALADO DELPHI 4.0 Y ORACLE 7.3 PERO NO HE PODIDO HACER LA CONECCION. ME GUSTARIA DONDE PUEDO BAJAR EL DRIVER DE ORACLE PARA PODER CONECTARME CON DELPHI YA QUE CUANDO INTENTO ME DICE QUE ALIAS NO RECONOCIDO, O QUE DEBO HACER PARA LOGRAR LA CONECCION? GRACIAS.

Respuesta:

Josue Jimenez Noyola

Eddison haber si te sirven mis comentarios!!! primero que delphi tienes ? yo he trabajado con delphi 4.0 cliente /servidor y cuando lo instalas de forma custom te permite seleccionar la version de oracle que quieres utilizar !!! ya que lo tengas instalado puedes establecer la conexion.
Primero verifica que te puedas conectar con el sqlnet del oracle para descartar la posibilidad de que este bien configurado el cliente.
Culaquier duda adelante!!!

Contestar

Pregunta:	34969 - VISOR PARA ARCHIVOS WORD EN DELPHI
Autor:	Mauricio Diaz
HOLA AMIGOS , TENGO EL SIGUIENTE PROBLEMA,NECESITO CREAR UN VISOR EN DEPLHI QUE ME PERMITA VER LOS ARCHIVO .DOC, HASTA AHORA SOLO HE PODIDO VER LOS RTF, ESPERO QUE ME PUEDAN AYUDAR MUCHAS GRACIAS

Respuesta:	Sebastián Mayorá
Creo que convendría utilizar objetos OLE, si tienes delphi 5 puedes usar los ActiveServer

Contestar

Pregunta:	35169 - ENVIO DE PARAMETROS ENTRE FORMAS MDI
Autor:	juan carlos
estoy tratando de realizar una aplicacion MDI y necesito enviar un dato que tengo en un componente Tedit a otro hubicado en otra forma MDIchild comolo puedo hacer? muchas gracias por su colaboracion

Respuesta:

Santiago Estupiñan Diaz

Bueno trataste de usar esto

var
paso:String;
i:integer;
begin
for i:=0 to form1.MDIChildCount-1 do
begin
if (form1.MDIChildren[i] as Tform2).Edit1.text<>'' then
paso:=(form1.MDIChildren[i] as Tform2).Edit1.text;
end;
for i:=0 to form1.MDIChildCount-1 do
begin
if (form1.MDIChildren[i] as Tform2).Edit1.text='' then
(form1.MDIChildren[i] as Tform2).Edit1.text:=paso;
end;
end;

Ojala te sirva

Saludos.

Contestar

Pregunta:	35610 - RELACIONAR UNA EXTENSIÓN CON MI PROGRAMA.
Autor:	Manuel D. Alhama
Que debo hacer para que al picar sobre un fichero con una determinada extensión, llame a mi programa y se abra con este.

Respuesta:

Anibal Sanchez Numa

Hola Manuel:

Lo que tienes que hacer es lo siguiente. Existe una constante, llamada paramstr que es en realidad un array que contiene los paràmetros con que es llamado el programa. El elemento de ìndice 0 contiene la ruta completa hasta tu programa, y a partir de ahì cada paràmetro segùn su orden. Por ejemplo, si quisieras cargar el archivo en un TMemo, podrìa ser algo asì:

if paramstr(1)<>'' then memo1.lines.loadfromfile(paramstr(1));

Esto como es lògico en el evento OnCreate del formulario.O sea, si se ha entrado algùn paràmetro entonces cargarlo. Yo recientemente tuve que utilizar esto, bueno en cualquier programa de cargar archivos es necesario. Te aconsejo que hagas un estudio profundo del Object Pascal, ahorraràs mucho tiempo y dolores de cabeza.

Bueno, cualquier otra duda que tengas, no dudes en escribirme. Soy un novato en el Delphi pero por suerte ya conocìa el Pascal; asì que mucho gusto tendrè en ayudaros en lo que pueda referente al lenguaje.

Un placer ayudarle.

Contestar

Pregunta:	35827 - VISOR DE DOCUMENTOS WORD EN DELPHI
Autor:	Mauricio Diaz
HOLA AMIGOS TENGO EL SIGUIENTE PROBLEMA, NECESITO DE ALGUNA MANERA MOSTRAR UN DOCUMENTO CON EXTENSION DOC EN UN FORMULARIO DE DELPHI. LO HE INTENTADO CON UN RICHEDIT Y CON EL LOADFROMFILE, PERO ESTE NO MERECONOCE ALGUNOS CARACTERES DE WORD, SOLO FUNCIONA BIEN CON LOS RTF GRACIAS.

Respuesta:	Julio César Plascencia Hernández
Buenas tardes: Lee las funciones de Word (en alguno de sus documentos de ayuda) para que hagas funciones de integración con OLE Automation. Lee la ayuda de Delphi concerniente al tópico OLE Automation, y con ello ya nada más dependerá de la función que hagas para mandar llamar tus documentos de Word en Delphi y que se desplieguen bien. Saludos.

Contestar

Pregunta:	35904 - AYUDA CON CONSULTA SQL USANDO ORDER BY
Autor:	Armando Montoya
Hola, gracias por leer mi pregunta tengo una duda para hacer la siguiente operación: tengo los siguientes componentes: un tquery, un tdatasource y un tdbgrid. la cadena SQL del tquery es como la siguiente: SELECT * FROM RECIBOS ORDER BY FECHAINICIAL ASC al ejecutar esta consulta no me permite editar los datos en el dbgrid ni por codigo aunque ponga la propiedad RequestLive a True en el tquery, he notado que si elimino la clausula ORDER BY si me permite editar los datos, como puedo hacer para que si me permita editarlos usando la clausula ORDER BY Gracias por tu respuesta

Respuesta:

Julio César Plascencia Hernández

Buenas tardes:

Te sugeriría que en tiempo de diseño hicieras tu sentencia SQL en 2 lineas, lo cual se vería en el String Editor de la siguiente forma:

Select * from recibos
Order By Fechainicial ASC

En tiempo de ejecución, para hacer la edición de registros, escribe este código

TQuery.sql(1):= '';

Cuando termines de hacer tu bloque de códgio de edición, escribe el siguiente

TQuery.sql(1):= 'Order By Fechainicial ASC';

Recuerda que la primer línea de un TListString o del Code Editor de la propiedad SQL tiene por valo 0, la siguiente 1 y así sucesivamente.

Espero te sirva la respuesta.

Saludos

Contestar

Pregunta:	36240 - RESTAR Y SUMAR HORAS EN DELPHI
Autor:	CESAR GUISEPPE CARRION BELDI
Alguien me pudiera ayudar en esto ejemplo : 10:51:45 + 1:00:00 = 11:51:45 y restando tambien les agradeceria un monton .

Respuesta:	Rober
Tienes la funcion IncHour, donde le pasas la fecha y los minutos que quieres sumar, o restar si el segundo parametro se lo pasas en negativo. Edit1.Text := DateTimeToStr(Now, 1); // Suma una hora a la hora actual Edit1.Text := DateTimeToStr(Now, -1); // Resta una hora a la hora actual Tambien esta la funcion IncYear, IncMonth......y alguna otra mas de este tipo

Respuesta:

emanuel aguilar salas

hola cesar, con respecto a tu codigo para sumar o restar una hora tengo este...

procedure TForm1.Button1Click(Sender: TObject);
begin
Edit1.Text := TimeToStr(Time);
Edit2.Text := TimeToStr(Time + 24/24 + 60/1440);

// suma Edit2.Text := TimeToStr(Time + 24/24 + 60/1440);
// resta Edit2.Text := TimeToStr(Time + 24/24 - 60/1440);
end;
Lo unico que tenes que hacer es cambiar el signo (+) o (-) y asi resta o suma una hora
Otra cosa, configura en 24 hs el reloj de windows asi no tengas problemas.
bye espero que te sirva

Respuesta:

Hugo OH

Hola cesar,

Como sabras, la clase que utiliza delphi para manejar fechas y horas es TDateTime... se trata de un numero flotante en el que la parte entera corresponde a la fecha y la fraccionaria a la hora... de esta manera, si al valor de una hora X le quieres agregar seis horas tenemos que 6 horas equivalen a una cuarta parte, por lo tanto a ese valor X habra que sumarle 0.25... o restarle...

por ejemplo, el siguiente codigo coloca en un Edit la hora actual y en otro Edit esa misa hora mas 1 hora (1/24 de un día) y 30 minutos... si quisieras trabajar con horas y minutos tendrias que utilizar h/24+m/1440 ... y asi sucesivamente...

Edit1.Text := TimeToStr(Time);
Edit2.Text := TimeToStr(Time + 1/24 + 30/1440);

saludos y espero te sirva... puedes revisar la ayuda del TDateTime type para mas detalles...

EOF

Contestar

Pregunta:	36344 - COMO BLOQUEAR EL ALT+TAB EN UNA APLICACION
Autor:	Ricardo Nolasco Rivera
Quisiera pedirles si pudieran ayudarme para saber como se bloquea el ALT+TAB en una aplicacion con Delphi 3. Gracias!

Respuesta:	Hugo OH
hola, para deshabilitarla: SystemParametersInfo( SPI_SETFASTTASKSWITCH, 0, @foo, 0); y para habilitarla: SystemParametersInfo( SPI_SETFASTTASKSWITCH, 1, @foo, 0); donde foo es una variable integer... saludos EOF

Contestar

Pregunta:	36447 - DRIVER NATIVO DE SYBASE
Autor:	Josue Jimenez Noyola
Si me pudieran ayudar, lo que pasa es que quiero conectarme a una base de datos de sybase pero no por odbc si no con el driver nativo, el problema que tengo que el driver es para sybase 8 y el que biene es para 4, donde puedo encontrar el driver o como le puedo hacer para conectarme con el driver nativo y si se puede. de antemano muchas gracias!!!

Respuesta:	Jonatan Moleiro
Prueba Zeos que puedes descargar desde http://sourceforge.net/projects/zeoslib/ Saludos

Contestar

Pregunta:	36843 - INSERTAR CHECKBOX EN UNA GRILLA
Autor:	Michelle
Mi pregunta es la siguiente: ¿Puedo en una celda de una grilla, stringgrid o drawgrid, insertar una checkbox o un radiogroup?, estoy programando en delphi 3.0 gracias

Respuesta:

Armando Montoya

hola, saludos desde irapuato, gto mexico
el siguiente codigo no lo he probado en delphi 3, lo hice en delphi 5 y funciona bien, te paso el codigo y si tienes problemas o dudas me lo comentas, esto va en el evento OnDrawCell de un TdbGrid, y en la columna que quieras que aparezca el checkbox no asignes un TDataField

if Column.FieldName = '' then //si no existe un Campo entonces
begin
dbgrid1.Canvas.FillRect(Rect);
if query1['Pagado']=true then // si el campo esta marcado entonces
DrawFrameControl(dbgRecibos.Canvas.Handle, Rect, DFC_BUTTON, DFCS_BUTTONCHECK or DFCS_CHECKED) // pon el checkbox marcado
else // si el campo no esta marcado entonces
DrawFrameControl(dbgRecibos.Canvas.Handle, Rect, DFC_BUTTON, DFCS_BUTTONCHECK) // pon el checkbox vacio
end
else
dbgrid1.DefaultDrawColumnCell(Rect, DataCol, Column, State);

Contestar

|< << 45 46 47 48 49 50 51 52 53 54 55 >> >|