|
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.
Temas - VeRaCrUzAnItO-10-
26
« en: Miércoles 19 de Octubre de 2005, 15:36 »
Hola a todos.. tengo una duda... no se como usar el dblookupCombobox espero puedan ayudarme ..... de antemano gracias y espero me puedan responder para seguir con mi proyecto..gracias
27
« en: Domingo 16 de Octubre de 2005, 08:22 »
Hola, Una tremenda duda, estoy haciendo una aplicación en Delphi con una base de datos en access, el problema esta en que la forma de insertar los datos no es la misma que mysql y pues no tengo ni idea de como se hace; solo se que se le debe de poner algo como "datamodule.append;", pero no se que mas se haga. Si alguien me pudiera recomendar alguna página con ejemplos o ponerme por aqui unas lineas de código se lo agradeceria mucho. Por su atenció mil gracias!!!,saludos.
28
« en: Domingo 20 de Marzo de 2005, 17:23 »
Hola,
Alguien sabe como se configura un cable null modem en linux?, les agradecere mucho su ayuda, saludos.
29
« en: Jueves 13 de Enero de 2005, 15:18 »
Hola, soy algo nuevo en java + base de datos, y necesito hacer una conexiòn de mysql a java, ¿alguien sabe como se hace?, muchas gracias, saludos.
Ya tengo mysql, java, y el obdc
Por cierto si conocen de algun tutorial sobre
30
« en: Lunes 6 de Diciembre de 2004, 04:08 »
Tengo un editbox del cual necesito leer el tamaño de los caracteres y me encuentre una letra, lo intente haciendo con el siguiente código el cual no me muestra errores, pero nunca aparece el MessageBox, tambien lo intente declarando una variable a la cual le asignaba "m_ecuacion.find" y se lo mandaba al MessageBox como "MessageBox("se encontro :"+ m_ecuacion.find) pero tampoco se pudo. Si alguien me puede ayudar se los agradeceria infinitamente. Saludos y de antemano mil gracias.
[CODE]void CGraficadorDlg::OnOK() { // TODO: Add extra validation here UpdateData(TRUE); if (m_ecuacion.IsEmpty ()== FALSE) { for (int k=0;k<m_ecuacion.GetLength();k++) { if (m_ecuacion.Find=='x') { MessageBox("se encontro x"); } UpdateData(FALSE); } }
CDialog::OnOK(); }
31
« en: Jueves 21 de Octubre de 2004, 23:07 »
Hola,
Como se concatena o lee caracter por caracter desde un edit, se necesita un apuntador a Char no?
Saludos.
32
« en: Martes 3 de Agosto de 2004, 04:53 »
Hola, Se que para enlazar VB y Mysql necesito el obdc mi duda es si este especial para VB, o es uno general, en la página de Mysql aparece uno pero no marca especificación para lenguaje en especial, además me han comentado que cada lenguaje necesita si obdc especial. Si alguién sabe de donde bajarlo y como se enlaza ojala y me explique. Es todo saludos desde su bello estado.
33
« en: Viernes 2 de Julio de 2004, 19:37 »
Hola,
inserto un texto en un edit pero a este le quiero dar formato ya que me aparece todo en una sola linea, asi que le quiero colocar los saltos de lineas, se intento valindandolo con una condicion que si leai por ejemplo una palabra y esta acaba en ";" hiciera el salto de linea "10" en ascci.
ejemplo
lo que inseto aparece asi
ahshs; sjsjsjs,jhsajhs,ajaja;
y quiero que aparezca asi;
ahshs; sjsjsjs,jhsajhs,ajaja;
que respete la condicion del ";"
34
« en: Miércoles 30 de Junio de 2004, 04:16 »
quiero cambiarle los atributos a una carpeta , quitarle el atributo de solo lectura; para poder copiar una base de datos en mysql, ¿alguien sabe como?
35
« en: Viernes 11 de Junio de 2004, 19:39 »
cual es el boton para jalar un archivo txt e insertarlo en un textbox.
36
« en: Jueves 10 de Junio de 2004, 15:24 »
Hola,
Mi duda es respecto a saber donde puedo encontrar ayuda o un codigo de referencia para hacer un "ligador" en C.Saludos.
37
« en: Jueves 27 de Mayo de 2004, 02:51 »
Hola, alguien me podria ayudar para bajar o coseguir el codigo de un cargador estatico y un ligador .
Gracias, saludos.
38
« en: Sábado 17 de Abril de 2004, 21:24 »
Tienen 128 cajas de texto, la cuales las tienen que llenar conforme entren datos, estos datos son númericos y alfabeticos, cada caja de texto vale 512 asi que multiplicadas por 128 es 65536 , asi que si entran un dato que valga 1489 este se debe dividir entre los 65536 para que asi llene la cajas que les correspondan con el nombre del archivo(textNom),que son 44.013, si e vuelve a ingresar otro dato este debe de empezar en lugar 45 y asi ahta llenar las 128 cajas de texto. Yo lo que hice primero fue con un 'textTam es la caja de texto donde tomo el numero, valor son los 65536 cargagado=textTam/valor for i=0 to cargado text(i%)=textNom 'lee leido next i% Pero solo me llena uno. Como le puedo hacer para que solo me llene dato enteros. Les pongo mi codigo Dim Entrada As Integer Dim Kb As Double Dim resp As Double Dim kbResp As Integer Dim aux As String Dim cargados As Byte Private Sub cdmSalir_Click() End End Sub Private Sub cmdAgregar_Click() 'llena los elementos con datos de entrada en las lista Nombres.AddItem txtNom.Text & " - " & txtTam.Text 'AQUI LLENA A LOS CUADROS DE TEXTO cargados = total / txtTam For i% = 0 To cargados Text1(i%) = txtNom Next i% 'el contardor de datos de entrada Entrada = Entrada + 1 txtEntrada = Entrada 'si entrada llega a su limite de elementos que se pueden agregar el botón se anula If Entrada = 128 Then cmdAgregar.Enabled = False End If 'si al descargas la entrada se vuelve negativo el textbox se anula If txtEntrada = -1 Then txtEntrada.Enabled = False End If 'si se ingresa de golpe los 655536+1 este nos marca que el espacio se ha sobrepasado If txtTam.Text = 65537 Then cmdAgregar.Enabled = False mensaje = MsgBox("Limite de Tamaño Pasado", vbApplicationModal) End If 'hacemos la suma de los kb cargados al ingresar los datos Kb = Kb + txtTam lblkb.Caption = Kb 'restamos los 65530 que es la multiplicación de 128*512 los kb ingresados para saber el espacio disponible resp = resp - Kb txtEspacio = resp 'marca si el tamaño se ha sobrepasado;nota no elimina el elmento que sobrepaso el limite If resp <= 0 Then cmdAgregar.Enabled = False mensaje = MsgBox("Limite de Tamaño Pasado", vbApplicationModal) End If End Sub Private Sub cmdCargar_Click() Do While descarga.ListIndex >= 0 'se colocan antes de eliminar en un auxiliar los elementos de descarga auxi = descarga.List(descarga.ListIndex) 'se eliminan los elementos de descargas, pero ya antes estos se guardaron en un auxiliar descarga.RemoveItem descarga.ListIndex 'vuelve a llenar los textbox con la información supuestamente eliminada For i% = 0 To 127 Text1(i%) = auxi Next i% 'se llena "nombres" con los elementos auxiliares cuando estos se quieren volver a cargar Nombres.AddItem auxi Loop 'al hacer la carga vuelve a aumentar el crgador Entrada = Entrada + 1 txtEntrada = Entrada 'si entrada llega al mámixo de elementos el botón de agregar se anula If Entrada = 128 Then cmdAgregar.Enabled = False End If End Sub Private Sub cmdDescarga_Click() 'elimina los elementos de carga para enviarlos a descargas Do While Nombres.ListIndex >= 0 aux = Nombres.List(Nombres.ListIndex) Nombres.RemoveItem Nombres.ListIndex 'llena los textbox con espacios en blanco al eliminar For i% = 0 To 127 Text1(i%) = " " Next i% descarga.AddItem aux 'resta los elementos cuando estos se descargab Entrada = Entrada - 1 txtEntrada = Entrada 'borra las etiquetas de kb Label5.Visible = False lblkb.Visible = False Loop End Sub Private Sub Form_Load() resp = 65536# total = 128 End Sub Private Sub txtNom_KeyPress(KeyAscii As Integer) 'valida para solo admitir letras cadena = "ZXCVBNMASDFGHJKLÑPOIUYTREWQzxcvbnmñlkjhgfdaqwertyuiop." + Chr(8) 'chr(8) = delete, es decir admitimos borrar If InStr(cadena, Chr(KeyAscii)) = 0 Then KeyAscii = 0 If Not InStr(cadena, Chr(keyAcii)) Then mensaje = MsgBox("Solo Caracteres Alfabeticos", vbApplicationModal) End If End If End Sub Private Sub txtTam_KeyPress(KeyAscii As Integer) 'valida el textbox de txtTam para solo admitir dato numéricos If Not IsNumeric(Chr(KeyAscii)) Then mensaje = MsgBox("Solo Datos Numéricos", vbApplicationModal) KeyAscii = 0 End If End Sub
39
« en: Miércoles 14 de Abril de 2004, 18:49 »
con que funcion valido un textbox para que solo admita letras?
40
« en: Martes 13 de Abril de 2004, 01:57 »
Hola; Gracias por la pasada informacion para enlazar formularios. Mi pregunta ahora es: tengo que jalar desde un textbox un palabra, esta mandarla a un list, de un list pasarla a otra caja de texto, pero el problema esta que por cada palabra debo de generar un color que la diferencie , por ejemplo si capturo 1 palabra este debera de mandarla en azul a un list y en azul al textbox, si capturo otra palabra esta debera de ser de diferente color, espero explicarme por que ni yo le entiendo muy bien. Por su ayuda mil gracias!!!!.
41
« en: Miércoles 7 de Abril de 2004, 23:10 »
Como enlazo dos fomularios?
42
« en: Miércoles 7 de Abril de 2004, 00:54 »
Hola,
Alguièn sabe de algùn buen manual para alguièn que se esta iniciando en fox Pro?o algùn libro que recomienden, ojala sea de alguna libreria que este en D.F. por que ando perdido por estos lugares.
43
« en: Domingo 28 de Marzo de 2004, 16:16 »
Hola, soy nuevo en delphi, mas que nada en su ambiente , pues en pascal se programar. Mi duda es, si el manejo de archivos en delphi es igual que en pascal, pues en pascal tenemos recorridos secuencial y directo , se ocupan palabras reservadas como "file","seek","reset","rewrite","eof", ¿estas son las mismas que en delphi?. Si alguien conoce de un manual para archivos en delphi ojala y me pueda ayudar. Muchas gracias de antemano. ¡¡  Por fin gano el Veracruz  !!!
44
« en: Jueves 25 de Marzo de 2004, 15:38 »
Hola, Todos se habran dado cuenta que cuando se programa en Basic y ponemos una palabra reservada como "Currentx","string","enable", cualquier palabra de esta, nos aparece una lista con los valores de los parametros que puede tomar, yo quisiera saber con que funcion al escribir texto esta me devuleve la posicion del puntero para poder aparecer una lista ahi.Algo que simule los mismo de Basic. Pues muchas gracias!!!. Pa' las vacaciones yo invito las chelas  y al Climax  si los Tiburones Ganan!!  za,za,za...yacuza...yacuza..mesa,mesa,mesa que mas aplauda le mando le mando a la niña!.
45
« en: Lunes 22 de Marzo de 2004, 00:38 »
Cual es la marca para saber el fin de linea y de archivo de un texto, por ejemplo en Pascal el fin de linea es <eoln> y el fin de archivo es <eof> , ¿en visual basic existen estas funciones? Es que nesesito hacer un contador de palabras en visual, este programa lo tengo en pascal y no he encontrado esta funcion en visual basic. Tambien en pascal los tipo de datos "char" indican solo un caracter, en visual basic este corresponde a "byte"? Sale gracias!.
46
« en: Jueves 18 de Marzo de 2004, 04:23 »
Solo esa pregunta, ¿existe alguna funcion similar en visual Basic que sea como el "readkey" es pascal?
47
« en: Martes 16 de Marzo de 2004, 06:18 »
Soy nuevo en esto de basic, tengo un programa el cual debe de guardar los datos puestos en cuadros de texto en arrays, miren declaro en un modulo mis array
Option Base 1 public memoria(4,4) As Variant sub main form1.show
despues pongon mis botones que por todos son 12 cuadros de texto, estos guardan la infomacion,se supone asi:
crg 3 A crg 2 B sum A B fin
Los lee de lso cuadro de texto, despues declaro una boton que es aceptar, este lleva un código asi: text1.text=memoria(1,1) text2.text=memoria(1,2) y asi etc..etc...
Mi duda es por que me marca erros en la etiqueta "text", no se si el array deba de ser del mismo tipo que los cuadros de texto o que se le pone para que los guarde en una matria.
De antemano mil gracias!!!.
48
« en: Martes 2 de Marzo de 2004, 03:36 »
Hola, aqui pidiendo su ayuda despues de en verdad namas no saber que hacer, este es un programa de archivos el cual en la funcion de "Modificar" me manda el error "Constant and CASE types do not match"
aqui les envio el pedazo de código haber si me pueden prestar su ayuda. De antemano mil gracias.
[/CODE] 2:Begin clrscr; writeln ('Nombre del Archivo'); readln (nomArch); writeln ('Numero de Departamento'); readln (ndepa); writeln ('Desea Modificar **a-Duracion** **b-Renta** **c-Incremento'); readln (opcMov); case opcMov of 'a':begin clrscr; writeln ('Nueva Duracion'); readln (durCont); end; 'b':Begin clrscr; writeln ('Nueva Renta'); readln (renta); end; 'c':Begin clrscr; writeln ('Nuevo Incremento'); readln (incAnual); end; modificar(nomArch,ndepa,opcMov,durCont,renta,incAnual); readkey; end;
Eso aparece en .pas, en el código principal y el unidad el tpu la tengo declarada asi: [CODE]function modificar(nomArch:str50;ndepa:integer;opcMov:char;durCont:integer;renta:real;incAnual:real):boolean; var f:file of depto; d:depto; aux:real; begin modificar:=false; assign(f,nomArch); reset(f); while not (eof(f)) do begin read(f,d); if ndepa=d.ndep then begin modificar:=true; writeln ('Datos de Departamento Modificado'); case opcMov of 'a':begin seek(f,filepos(f)-1); d.dur:=durCont; write(f,d); end; 'b':begin seek(f,filepos(f)-1); d.rent:=renta; write(f,d); end; 'c':begin seek(f,filepos(f)-1); d.inc:=incAnual; write(f,d); end; end; end; close(f); end; end;
Y pa que no digan que no hay abundancia, tambien por ahi les anezo el .pas y .tpu
|
|
|