• Viernes 3 de Mayo de 2024, 01:05

Mostrar Mensajes

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 - _Viktor

Páginas: 1 2 [3] 4 5 ... 11
51
C++ Builder / Re: Matrices Que Contengan Imágenes, Es Posible??
« en: Lunes 5 de Julio de 2004, 15:56 »
Prueba haciendo un arreglo de imagenes, tal como su nombre lo indica:

Código: Text
  1. TImage *Arreglo[20];
  2.  
  3. for(int i=0;i<20;i++)
  4. {
  5.  
  6.   Arreglo[i]  = new TImage(Form1);
  7.   Arreglo[i]->Picture->LoadFromFile("ruta a la imagen");
  8.   Arreglo[i]->Width = 100;
  9.   Arreglo[i]->Heigth = 200;
  10.   // Y todas las demas propiedades que necesitas...
  11.  Arreglo[i]->Show();
  12. }
  13.  

Es decir puedes crear tanto arreglos como matrices de cualquier componente en BCB al igual que en C o C++...

Saludos!

52
C++ Builder / Re: Registro
« en: Miércoles 30 de Junio de 2004, 20:19 »
Prueba esto:

Código: Text
  1. FrmRegistro->TablaRegistro->Append();
  2. FrmRegistro->TablaRegistro->FieldByName("Usuario")->AsString = CmpUsuario->Text;
  3. FrmRegistro->TablaRegistro->Post();
  4.  

Saludos !

53
C++ Builder / Re: Mdi
« en: Miércoles 30 de Junio de 2004, 20:15 »
Hola, Prueba  este codigo en el constructor del form mdi 'padre'.

Código: Text
  1. Brush->Bitmap = Imagen->Picture->Bitmap;
  2.  

Donde Imagen es un componente TImage con un bitmap.

Saludos !

54
C++ Builder / Re: Registro
« en: Miércoles 30 de Junio de 2004, 01:39 »
Puedes poner el error que te resulta con ese codigo?

Saludos!

55
C++ Builder / Re: Conseguir La Hora De La Bios
« en: Miércoles 30 de Junio de 2004, 01:38 »
Si quieres la hora del sistema usa la funcion Time();

Ej:

Código: Text
  1.  String sHora = DateToStr(Time());
  2.  ShowMessage("La hora actual es: " + sHora);
  3.  
 

Saludos !

56
C++ Builder / Re: C++ Builder Visual
« en: Miércoles 30 de Junio de 2004, 01:34 »
Te dejo otros link's:

BCBDev
Visual Component Library

Busca en la red el siguiente libro:

Borland C++ Builder 5.0 Developer's Guide. (En Ingles)

y si quieres algo con BD's:

La Cara oculta de C++ Builder (Ian Marteens).

Algo de eso te servira.
Saludos!

57
C++ Builder / Re: Labels Con Variables
« en: Sábado 26 de Junio de 2004, 01:17 »
Algo como esto te puede servir de idea:


UNIT1.CPP

Código: Text
  1. //---------------------------------------------------------------------------
  2. #include <vcl.h>
  3. #pragma hdrstop
  4.  
  5. #include "Unit1.h"
  6. #define INTENTOS 4//numero max de intentos
  7. //---------------------------------------------------------------------------
  8. #pragma package(smart_init)
  9. #pragma resource "*.dfm"
  10. TForm1 *Form1;
  11. //---------------------------------------------------------------------------
  12. __fastcall TForm1::TForm1(TComponent* Owner)
  13.         : TForm(Owner)
  14. {
  15.  nIntentos = 0;
  16. }
  17. //---------------------------------------------------------------------------
  18.  
  19. void __fastcall TForm1::Button1Click(TObject *Sender)
  20. {
  21.   if(Edit1->Text == "dato correcto")
  22.      Label1->Caption = "Ha logrado su objetivo";
  23.   else
  24.     {
  25.       if(nIntentos < INTENTOS)
  26.        {
  27.          nIntentos++;
  28.          Label1->Caption = "Le quedan " + IntToStr(INTENTOS - nIntentos) + " Intentos";
  29.        }
  30.      else
  31.         Label1->Caption = "Se le terminaron los intentos...";
  32.     }
  33. }
  34. //---------------------------------------------------------------------------
  35.  
  36.  

UNIT1.H

Código: Text
  1.  
  2. /---------------------------------------------------------------------------
  3. #ifndef Unit1H
  4. #define Unit1H
  5. //---------------------------------------------------------------------------
  6. #include <Classes.hpp>
  7. #include <Controls.hpp>
  8. #include <StdCtrls.hpp>
  9. #include <Forms.hpp>
  10. //---------------------------------------------------------------------------
  11. class TForm1 : public TForm
  12. {
  13. __published:  // IDE-managed Components
  14.         TButton *Button1;
  15.         TLabel *Label1;
  16.         TEdit *Edit1;
  17.         void __fastcall Button1Click(TObject *Sender);
  18. private:  // User declarations
  19. public:    // User declarations
  20.         int nIntentos;
  21.         __fastcall TForm1(TComponent* Owner);
  22. };
  23. //---------------------------------------------------------------------------
  24. extern PACKAGE TForm1 *Form1;
  25. //---------------------------------------------------------------------------
  26. #endif
  27.  
  28.  

Saludos !

PD: Disculpa si aparece algun error de sintaxis... no tengo BCB instalado donde estoy trate de hacerlo lo mas parecido a como lo da Builder.

58
C++ Builder / Re: Duda Con Sockets
« en: Martes 22 de Junio de 2004, 19:53 »
Efectivamente, te ahorrarias la confirmacion de el orden de los datagramas enviados... si tienes tiempo usa UDP de lo contrario utiliza mejor TCP...

Saludos!

59
C++ Builder / Re: Presionar Enter En Un Edit
« en: Sábado 19 de Junio de 2004, 03:41 »
Mira esto te puede servir:

Código: Text
  1. void __fastcall TForm1::edtDatoKeyPress(TObject *Sender, char &Key)
  2. {
  3.  if(Key == VK_RETURN)
  4.    btnSiguienteClick(Sender);
  5. }
  6. //---------------------------------------------------------------------------
  7.  
  8. void __fastcall TForm1::btnSiguienteClick(TObject *Sender)
  9. {
  10.   ShowMessage("Codigo del OnClick del boton siguiente");
  11. }
  12.  

Saludos!

60
C++ Builder / Re: Matrices
« en: Jueves 10 de Junio de 2004, 03:17 »
Para eso estan los foros de consultas.... ! si leiste de lo que se trata este post, deberias haberlo notado...

Saludos!

61
C++ Builder / Re: Acceso A Bases De Datos Mysql Desde C++ Builder
« en: Miércoles 2 de Junio de 2004, 20:31 »
Buscate el driver MyOdbc, te sirve para crear un Alias odbc y a partir de ahi conectarte a la BD a travez de tu aplicacion en BCB, luego puedes ver en la ayuda acerca de los siguientes componentes TDataSource, TQuery, TTable, TDBGRid, etc. todos los que estan en la paleta Data Acces y Data Controls de componentes, los ejemplos de la ayuda son bastante claros.

Saludos!

62
C++ Builder / Re: Aplicación Demo
« en: Miércoles 2 de Junio de 2004, 20:28 »
Entra en Sourceforge.net y en su buscador pon "TurboPower" ahi te aparecera una coleccion de componentes para BCB y Delphi entre los que figura uno que cumple la funcion de dejar tu aplicacion como trial o demo....

Saludos!

63
C++ Builder / Re: Ordenar Base De Datos
« en: Miércoles 2 de Junio de 2004, 20:19 »
Para eso puedes usar SQL con su sentencia "Order by nombre_campo"...

Saludos!

64
C++ Builder / Re: Alinear Edit
« en: Martes 1 de Junio de 2004, 20:55 »
Puedes usar un TMemo con las dimensiones de un TEdit, es una de las soluciones mas antiguas, pero funciona perfecto:

Código: Text
  1. void __fastcall TForm1::Memo1Change(TObject *Sender)
  2. {
  3.  int caret = Memo1->SelStart&#59;
  4.  String text = Memo1->Text&#59;
  5.  for (int index = text.Pos ("\n")&#59; index != 0&#59; index = text.Pos ("\n"))
  6.  {
  7.   text.Delete (index, 1)&#59;
  8.   -- caret&#59;
  9.  }
  10.  for (int index = text.Pos ("\r")&#59; index != 0&#59; index = text.Pos ("\r"))
  11.  {
  12.   text.Delete (index, 1)&#59;
  13.   -- caret&#59;
  14.  }
  15.  if (caret != Memo1->SelStart)
  16.  {
  17.   Memo1->Text = text&#59;
  18.   Memo1->SelStart = caret&#59;
  19.  }
  20. }
  21.  

Saludos!

65
C++ Builder / Re: ¿config Driver Ms Access?
« en: Martes 1 de Junio de 2004, 20:45 »
Hola, para eso tienes que agregar un TDatabase y en su propiedad LoginPromp le das en falso.... y en alias pones el que creas con el codigo anterior, luego los Querys o Tables que uses los conectas a este por medio de su propiedad Database... y listo.

Saludos!

66
C++ Builder / Re: Como Hacer Q No Se Pueda Cerrar Un Formulario
« en: Lunes 31 de Mayo de 2004, 23:20 »
Aqui tienes otra alternativa que puedes modificar para tu problema:

Código: Text
  1. void __fastcall TForm1::FormCloseQuery(TObject *Sender, bool &CanClose)
  2. {
  3.  if( Application->MessageBox("Desea cerrar?", "Mensaje", MB_ICONWARNING + MB_OKCANCEL)== ID_OK)
  4.     CanClose = true;
  5.  else
  6.     CanClose =false;
  7. }
  8.  

Saludos!

67
C++ Builder / Re: ¿config Driver Ms Access?
« en: Lunes 31 de Mayo de 2004, 22:38 »
Esto te servira:


Código: Text
  1. //-----------------------------------------------------------------
  2. //  Modificar alias
  3. void __fastcall TForm1::btnModifyClick(TObject *Sender)
  4. {
  5.     std::auto_ptr< TStringList > params( new TStringList);
  6.     params->Values["ENABLE BCD"] = "TRUE";
  7.     Session->ModifyAlias("BCDEMOS", params.get());
  8.     Session->SaveConfigFile();
  9. }
  10. //-----------------------------------------------------------------
  11. // Agregar Alias Standard
  12. void __fastcall TForm1::btnAddStandardClick(TObject *Sender)
  13. {
  14.     const AnsiString path =
  15.         "C:\\Program Files\\Common Files\\Borland Shared\\Data";
  16.     Session->AddStandardAlias("BCBDEV_DB", path, "PARADOX");
  17.     Session->SaveConfigFile();
  18. }
  19. //-----------------------------------------------------------------
  20. // Agregar Alias
  21. void __fastcall TForm1::btnAddClick(TObject *Sender)
  22. {
  23.     std::auto_ptr< TStringList > params( new TStringList);
  24.     params->Values["ENABLE BCD"]    = "TRUE";
  25.     params->Values["DATABASE NAME"] = "production";
  26.     params->Values["SERVER NAME"]   = "NTS_PROD";
  27.     params->Values["USER NAME"]     = "hhowe";
  28.     params->Values["PASSWORD"]      = "mfcblowschunks";
  29.  
  30.     Session->AddAlias("BCBDEV_SQL", "MSSQL", params.get());
  31.     Session->SaveConfigFile();
  32. }
  33. //-----------------------------------------------------------------
  34. //  Eliminar Alias
  35. void __fastcall TForm1::btnDeleteClick(TObject *Sender)
  36. {
  37.     Session->DeleteAlias("BCBDEV_DB");
  38.     Session->SaveConfigFile();
  39. }
  40. //-----------------------------------------------------------------
  41.  

Ahora si lo que quieres es un alias ODBC. mira el siguiente post que subi en la seccion trucos:

http://foros.solocodigo.com/index.php?showtopic=5695

68
C++ Builder / Re: Como Imprimir???
« en: Viernes 28 de Mayo de 2004, 21:13 »
Incluye los siguientes archivos

Código: Text
  1. #include < printers.hpp >
  2. #include < math.h >
  3.  

Pon un componente TPrintDialog, un TMemo y un boton:

Código: Text
  1. void __fastcall TForm1::Button1Click(TObject *Sender)
  2. {
  3. if (PrintDialog1->Execute()) {
  4.  
  5. Printer()->Canvas->Font = Memo1->Font; //Asignamos la fuente de impresion
  6. int lineHeight = abs(MulDiv(Printer()->Canvas->Font->Size,
  7. GetDeviceCaps(Printer()->Handle, LOGPIXELSY), 72)); // determinamos altura de la linea
  8. lineHeight *= 1.4;
  9. int linesPerPage = (Printer()->PageHeight/lineHeight) - 2;
  10. int lineCount = 2; // iniciamos la impresion en la linea 2 para dejar margen (en vez de la 0)
  11.  
  12. Printer()->BeginDoc();
  13. for (int i=0;i < Memo1->Lines->Count;i++) {
  14. if (lineCount++ == linesPerPage) {
  15. lineCount = 2;
  16. Printer()->NewPage();
  17. }
  18. String s = Memo1->Lines->Strings[i];
  19. Printer()->Canvas->TextOut(0, lineCount * lineHeight, s);
  20. }
  21. Printer()->EndDoc();
  22. }
  23. }
  24.  


Haber si te sirve...
Saludos!

69
C++ Builder / Re: Componente
« en: Viernes 28 de Mayo de 2004, 20:57 »
Para saber a que dia de la semana corresponde determinada fecha, puedes hacer algo como lo siguiente:

Suponiendo que la fecha la tego guardada en una variable dMiFecha, yo lo haría así:

Código: Text
  1. Word Year, Month, Day;
  2. TDateTime dFecha;
  3. AnsiString cDias[7] = {"Dom.","Lun.","Mar.","Mier.","Juev.","Vier.","Sab."};
  4.  
  5. DecodeDate(dMiFecha, Year, Month, Day);
  6. if (Month == 12)
  7. {
  8.      Year ++;
  9.      Month = 0;
  10. }
  11. dFecha = EncodeDate(Year, Month + 1, (Word)StrToInt("01")) - 1;
  12. DecodeDate(dFecha, Year, Month, Day);
  13. ShowMessage("útimo día del mes " + StrToDate(dMiFecha) + " es el " + Day + ", y es " + cDias[DayOfWeek(dFecha)];
  14.  

Saludos!

70
C++ Builder / Re: Llamar Un Comando De Dos Con Parametros?
« en: Martes 18 de Mayo de 2004, 21:01 »
Puede que esto te sirva:

Código: Text
  1. void __fastcall TForm1::Button1Click(TObject *Sender)
  2. {
  3.  TStringList *Archivo = new TStringList;
  4.  Archivo->Clear();
  5.  
  6.  if(FileExists("Comando.bat"))
  7.    DeleteFile("Comando.bat");
  8.  
  9.  Archivo->Add("Dir c:\ > salida.txt");
  10.  Archivo->SaveToFile("comando.bat");
  11.  
  12.  ShellExecute(Handle, "open","comando.bat",0,0,SW_HIDE);
  13.  Memo1->Lines->LoadFromFile("salida.txt");
  14.  
  15.  delete Archivo;
  16. }
  17.  

Obviamente existe una forma mas elegante de hacerlo, pero tendrias que crear un pipe a la salida, y la verdad encuentro que no merece la pena el esfuerzo...

Saludos!

71
C++ Builder / Re: Abrir Una Pagina Web Desde Un Boton.
« en: Sábado 8 de Mayo de 2004, 21:09 »
Citar
Mmmm... yo no inclui esa lib...igual me funca......pero bueno::: Saludos a todos

Eso es simplemente por que CBuilder reconoce por defecto las librerias API de windows solo desde la version 5 en adelante... de seguro el tiene la 4 o inferior.

Saludos!

72
C++ Builder / Re: Informacion De Un Edit
« en: Miércoles 5 de Mayo de 2004, 00:18 »
Black.. tomate un tiempo para leer bien mi respuesta anterior... veras que ya te respondi eso... si estas insertando no puedes tener activo el query si no le has dado valores a los parametros.
La propiedad SQL se la estas dando en tiempo de ejecucion al hacer
Query->SQL->Add("Insert....") ... de verdad no entiendo que es lo que no entiendes...

73
C++ Builder / Re: Informacion De Un Edit
« en: Martes 4 de Mayo de 2004, 20:02 »
Amigo. Al hacer:

Código: Text
  1. Query->SQL->Add("Insert Into....");
  2.  

Con eso le estas dando el valor a la propiedad SQL del Query... seria mejor que me dijeras que error te esta da la insercion...

Recuerda que si estas insertando tienes que usar el metodo ExecSQL del Query, el metodo Open es solo para Consultas..

Saludos!

74
C++ Builder / Re: Colocar Icono Al Lado Del Reloj
« en: Lunes 3 de Mayo de 2004, 20:05 »
Mira este ejemplo, es para hacerlo sin un componente....

C:\Archivos de programa\Borland\CBuilder4\Examples\Apps\TrayIcon

Y el siguiente es el componente que mencione para bcb4:

C:\Archivos de programa\Borland\CBuilder4\Examples\Controls\Tray

Saludos!

75
C++ Builder / Re: Abrir Una Pagina Web Desde Un Boton.
« en: Lunes 3 de Mayo de 2004, 20:01 »
Para eso tienes que incluir la siguiente libreria:

Código: Text
  1. #include <shellapi.h>
  2.  


Y listo.

Páginas: 1 2 [3] 4 5 ... 11