|
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 - eL_MoStRo
Páginas: [1]
1
« en: Miércoles 14 de Marzo de 2007, 15:44 »
intenta desmarcando las opciones de "dynamic rtl" en la pestaña de linker y la de "build with runtime packages" de la pestaña packages, estas se encuentran en el menu de opciones de proyecto.
Saludos!!
2
« en: Jueves 18 de Enero de 2007, 00:41 »
Saludos!! Tengo el siguiente problema y espero alguien pueda ayudarme, tengo un webservice que recupera informacion de una BD, si hago la llamada mientras estoy depurando, el webservice se ejecuta perfectamente pero una vez que lo ejecuto desde el sitio publicado marca el siguiente error An error has occurred while establishing a connection to the server. When connecting to SQL Server 2005, this failure may be caused by the fact that under the default settings SQL Server does not allow remote connections. (provider: Named Pipes Provider, error: 40 - Could not open a connection to SQL Server)
Gracias de antemano y esperando respuestas
3
« en: Lunes 23 de Octubre de 2006, 00:03 »
4
« en: Sábado 21 de Octubre de 2006, 19:56 »
Hola Amigos!!,
El problema es el siguiente tengo una aplicacion que debe generar un reporte, y estoy utilizando quickreport, lo que sucede es que se extrae un campo MEMO de la BD y en el quickreport lo visualizo con unj QRDBRichText, hasta ahi todo esta perfecto lo que me esta deteniendo es que a veces el texto es demasiado largo y se necesita mas de una hoja en el reporte y necesito que los mismos datos que aparecen en la primera hoja aparezcan en la segunda asi como el resto del texto, si en el QRDBRichText pongo a true la propiedad AutoStretch entonces el texto si se va a otra hoja pero los demas datos no. Si alguien tiene una solucion o si me puede orientar se los agradeceria muchisimo, de antemano gracias
5
« en: Jueves 5 de Octubre de 2006, 19:01 »
Hola, puedes intentar colocandolo dentro de un bloque try catch, para que atrapar la excepcion que se genera y de este modo no muestra el mensaje de error try { int iVar = Edit1->Text.ToInt(); } catch (...) { // Aqui puedes poner el codigo que quieres que se realice en caso de que // se genere un excepcion, o bien no hacer nada y el mensaje no saldra }
Espero y te funcione, Saludo!!
6
« en: Jueves 5 de Octubre de 2006, 18:54 »
Hola, mira el componente seri el MaskEdit se encuentra en la pestaña de Additional y despues editarias la propiedad EditMask, en la cual delimitas la longitud del edit y para identificar que solo son numeros le tecleas ya sea un cero o un nueve
7
« en: Jueves 5 de Octubre de 2006, 18:48 »
Espero y te sirvan creo que funcionan bien sin embargo no probe con muchos valores //--------------------------------------------------------------------------- AnsiString BinToInt(AnsiString sVal) { int iAcum = 0; for (int iI = sVal.Length(), iJ = 0; iI > 0; iI--, iJ++) { if (sVal[iI] == '1') { iAcum += pow (2, iJ); } } return String(iAcum); } //--------------------------------------------------------------------------- AnsiString IntToHex(AnsiString sVal) { int iRes = StrToInt(sVal); int iMod; AnsiString sHex = ""; char cChar; do { iMod = iRes % 16; switch (iMod) { case 10: cChar = 'A'; break; case 11: cChar = 'B'; break; case 12: cChar = 'C'; break; case 13: cChar = 'D'; break; case 14: cChar = 'E'; break; case 15: cChar = 'F'; break; default: cChar = iMod; } sHex.Insert(String(cChar),1); iRes /= 16; } while(iRes > 9); sHex.Insert(String(iRes),1); return sHex; }
8
« en: Jueves 5 de Octubre de 2006, 17:21 »
Hola por que no intentas con un MaskEdit, y asi te evitas de validaciones, Saludos!!
9
« en: Jueves 5 de Octubre de 2006, 03:39 »
Hola, estuve checando tu historial de mensajes y todos estan mas o menos relacionados, y por lo que puedo ver estas trabajando como si tuvieras cartas modelo, la verdad no estoy muy familiarizado con cartas modelo sin embargo te puedo recomendar que trabajes con Marcadores (bookmarks) con archivos plantilla y archivos destino, si tienes alguna otra pregunta no dudes en preguntar
10
« en: Miércoles 4 de Octubre de 2006, 01:16 »
Puede acceder pixel por pixel si es lo que necesitas ya que un bitmap no es mas que una matriz de pixeles. ImagenBmp->Pixels[iX][iY];
11
« en: Miércoles 4 de Octubre de 2006, 01:07 »
Hola lo que puedes hacer es abrir el documento original y despues hacerle un SaveAs con otro nombre alternativo de esta manera todo lo que hagas solo se vera reflejado en el nuevo documento y no en el de base. Variant vWord, vDocumentos, vDocumento, vSeleccion; String sPath = ExtractFilePath( Application->ExeName ); String sSrcFile = sPath + "titulo platilla.doc"; String sDestFile = sPath + "titulo resultado.doc"; try { vWord = Variant::CreateObject( "Word.Application" ); vWord.OlePropertySet( "Visible", false ); } catch ( ... ) { MessageBox(0,"Probablemente Microsoft Word no se encuentre instalado", "Error de comunicacion", MB_OK | MB_ICONERROR); return; } //--- Abre el documento que usaremos como plantilla vDocumentos = vWord.OlePropertyGet( "Documents" ); vDocumento = vDocumentos.OleFunction( "Open", sSrcFile.c_str(), // Documento false, // Confirmar conversiones true, // solo lectura false, // Añadir al menu de rec. "" // Pswd del documento¿ ); // AQUI TODO LO QUE VAYAS A HACER vDocumento.OleProcedure( "SaveAs", sDestFile.c_str() ); vDocumento.OleProcedure( "Close", -1); vWord.OleProcedure( "Quit" ); vWord = vDocumentos = vDocumento = vSeleccion = Unassigned;
Espero y te sirva, Saludos !!
12
« en: Sábado 30 de Septiembre de 2006, 22:01 »
Lo que puede estar pasando es que el otro ordenador no tiene el builder instalado y por eso el BDE del builder no se encuentra, si lo que quieres es que funcione en todas las maquinas trabaja via ODBC y veras que te funciona, Saludos!!
13
« en: Sábado 30 de Septiembre de 2006, 00:48 »
Hola!!, espero y esto te ayude Variant vWord, vDocumentos, vDocumento, vSeleccion; String sPath = ExtractFilePath( Application->ExeName ); //--- Abre Word try { vWord = Variant::CreateObject( "Word.Application" ); vWord.OlePropertySet( "Visible", false ); } catch ( ... ) { MessageBox(0,"Probablemente Microsoft Word no se encuentre instalado", "Error de comunicacion", MB_OK | MB_ICONERROR); return; } //--- Abre el documento que usaremos como plantilla vDocumentos = vWord.OlePropertyGet( "Documents" ); vDocumento = vDocumentos.OleFunction( "Open", sSrcFile.c_str(), // Documento false, // conversiones de formato (unicode, etc) false, // Modo se solo lectura false, // Añadir al menu de ficheros recientes "" // Pswd del documento ); vSeleccion = vWord.OlePropertyGet( "Selection" ); Variant vRango = vSeleccion.OlePropertyGet( "Range" ); vRango.OleProcedure( "SetRange", 0, 0 ); Variant vBuscar = vSeleccion.OlePropertyGet( "Find" ); vBuscar.OleProcedure( "ClearFormatting" ); vBuscar.OlePropertyGet( "Replacement" ).OleProcedure( "ClearFormatting" ); // Sustitucion de una palabra vBuscar.Exec( Procedure( "Execute" ) << "texto a buscar" // Texto a buscar << VT_EMPTY // Coincidir mayusculas y minusculas << VT_EMPTY // Solo palabras completas << VT_EMPTY // Usar caracteres comodin << VT_EMPTY // Suena como << VT_EMPTY // Todas las formas de la palabra << true // Hacia adelante << VT_EMPTY // Wrap << VT_EMPTY // Format << "Texto a remplazar" // Reemplazar con... << 2 // 2 = reemplazar todo ); vDocumento.OleProcedure( "SaveAs", "Nombre.doc" ); vDocumento.OleProcedure( "Close", 0xFFFFFFFF); vWord.OleProcedure( "Quit" ); vWord = vDocumentos = vDocumento = vSeleccion = vBuscar = vRango = Unassigned;
Con este bloque segun yo puedes abrir un documento seleccionas todo el contenido y hace una busqueda de un texto determinado y posteriormente guarda el documento. Si tienes alguna otra duda no dudes en hacer ptro post. Suldos!!
14
« en: Martes 26 de Septiembre de 2006, 20:12 »
Hola amigos!!, la duda es la siguiente, necesito de alguna manera "importar" un reporte que ya se encuentra hecho en el reporteador de fox, es archivo con extencion frx, si alguien pudiera decirme si hay que tener algun componente o alguna libreria. De antemano gracias por las respuestas
15
« en: Martes 29 de Agosto de 2006, 07:23 »
int iX1,iY1, iX2, iY2; iX1 = iY1 = iX2 = iY2 = 0; for (int iI = 0; iI < StringGrid1->RowCount; iI++) { StringGrid1->Canvas->Pen->Style = psClear; StringGrid1->Canvas->Brush->Color = iI * 150; iX1 = 0; iY1 = iY2; iX2 = StringGrid1->DefaultColWidth * StringGrid1->ColCount + StringGrid1->GridLineWidth * StringGrid1->ColCount; iY2 = iY1 + StringGrid1->DefaultRowHeight + StringGrid1->GridLineWidth * 2; StringGrid1->Canvas->Rectangle(iX1, iY1, iX2, iY2); }
Talvez esto te ayude solo sustituye el valor del entero en el color para ver los resultados
16
« en: Martes 29 de Agosto de 2006, 06:53 »
Hola!, por que no intentas asignandole un entero, afin de cuentas los valores de clBlue, clRed, no son mas que un enumerado, haz una prueba asignando un entero tal vez te de una advertencia de querer asignar un entero a un TColor si no kieres que aparezca solamente haz el cast y listo int i,j; int clase[2]={10,100}; for(i=1;i<=StringGrid1->RowCount;i++) { for(j=0;j<=1;j++) { StringGrid1->Color=clase[j]; } }
pero con esto solo lograras pintar todo el StringGrid no cada renglon. Espero y te sirva de ayuda
17
« en: Viernes 18 de Agosto de 2006, 06:36 »
Hola me parece que el problema es que esas funciones fread y fwrite no soportan la clase String ni AnsiString, intenta poner tus atributos de la clase con cadenas char y veras que si funciona. Espero y te sirva class TItem{ private: char name[10]; char apellido[10]; }
18
« en: Jueves 27 de Julio de 2006, 18:49 »
Intenta con esto, originalmentew yo lo tenia con un DBGrid pero cro que asi debe de funcionar Variant oExcel, oWkBook, oSheet, oCell; try { oExcel = Variant::CreateObject("Excel.Application"); oExcel.OlePropertySet("Visible", (Variant)true); } catch (Exception &exception) { MessageBox(0,"Probablemente Microsoft Excel no se encuentre instalado", "Error de comunicacion", MB_OK | MB_ICONERROR); return; } oWkBook = oExcel.OlePropertyGet("WorkBooks"); oWkBook.OleProcedure("Add"); oSheet = oWkBook.OlePropertyGet("Item",(Variant)1); oWkBook = oSheet.OlePropertyGet("Worksheets"); oWkBook.OlePropertyGet("Item", (Variant)1).OlePropertySet("Name","Consulta"); oSheet = oWkBook.OlePropertyGet("Item",1); for (int iI = 0; iI < StringGrid1->RowCount; iI++) for (int iJ = 0; iJ < StringGrid1->ColCount; iJ++) oSheet.OlePropertyGet("Cells").OlePropertyGet("Item",iI + 1,iJ + 1).OlePropertySet("Value",(Variant)(WideString)StringGrid1->Cells[iJ][iI]); oExcel = Unassigned;
Si no te funciona me avisas para ver ke puede ser lo que esta mal
Páginas: [1]
|
|
|