Ver Mensaje Individual
  #1  
Antiguo 06-05-2008
man_cj man_cj is offline
Registrado
 
Registrado: ene 2008
Posts: 2
Reputación: 0
man_cj Va por buen camino
Question Help!!! Error al codificar Delphi a C++ Builder

Buenas primero que nada este es mi primer post y pues un saludo al "Club Delphi"

Para empezar tego un serio problema en la transformacion de Delphi a C ++ Builder 6 pues... con eso de que no hay mucha informacion de cbuilder en cuanto al manejo de bases de datos uno se llega a complicar bastante ... ahora que en delphi pues hay de todo ... bueno pues navegando en el club delphi encontre el "Tutorial Programa Ejemplo Ado, MsAccess (Novatos)" http://wiki.clubdelphi.com/wiki/inde...ría:Tutoriales echo en Delphi y pues 10 puntos.. y al pasarlo a C++ Builder 6 sorpresa el codigo tenia errores en builder (pruebenlo y veran que si da error al compilar)cambie todo de arriba a abajo, lei y re-lei el tutorial (ojo esta bien explicado ) cambie los := por :, el . por ->, respete mayusculas, etc., etc., etc, y pues nada me perdi... Delphi es versatil ¿porque C++ Builder no pudiera serlo?

//---Código en Delphi (este es el primer codigo a arreglar que no jala en builder)

Código Delphi [-]
 
procedure TBanco.FormCreate(Sender: TObject);
begin
   DTP1.DateTime:= now; // inicio la fecha al dia de hoy
   Banco.Active := True; // activo la tabla
   Banco.Last; // le indico que lea el ultimo registro
   SumRet.Active := True; // activo el query
   SumDep.Active := True; // activo el query
   // coloco el resultado de (SumDep - SumRet) en el edit
   ESalTot.Text := FloatToStr((SumDep.Fields[0].AsFloat) - SumRet.Fields[0].AsFloat);
   // establecemos los dbedits como desactivados
   DBNTransac.Enabled := False;
   DBDescrip.Enabled := False;
   DBRetiros.Enabled := False;
   DBDeposit.Enabled := False;
   DBSalAnt.Enabled := False;
   // Deshabilitamos el combobox
   CBTipo.Enabled:= False;
   // Deshabilitamos el navegador
   DBNavigator1.Enabled := False;
   // escondemos los botones, con esto evitamos cometer errores
   BRetiros.Visible := False;
   BDeposito.Visible := False;
end;






//--- Y ésta la codificación en C++ Builder 6 (lo que esta en rojo es donde da el error, porque )

Código:
 
void __fastcall TForm1::FormCreate(TObject *Sender)
{
   DTP1->DateTime = Now(); // inicio la fecha al dia de hoy
   Banco->Active = true; // activo la tabla
   Banco->Last(); // le indico que lea el ultimo registro
   SumRet->Active = true; // activo el query
   SumDep->Active = true; // activo el query
   // coloco el resultado de (SumDep - SumRet) en el edit
   ESalTot->Text = FloatToStr(SumDep->Fields[0]->AsFloat - SumRet->Fields[]->AsFloat);
   // establecemos los dbedits como desactivados
   DBNTransac->Enabled = false;
   DBDescrip->Enabled = false;
   DBRetiros->Enabled = false;
   DBDeposit->Enabled = false;
   DBSalAnt->Enabled = false;
   // Deshabilitamos el combobox
   CBTipo->Enabled = false;
   // Deshabilitamos el navegador
   DBNavigator1->Enabled = false;
   // escondemos los botones, con esto evitamos cometer errores
   DBRetiros->Visible = false;
   DBDeposit->Visible = false;
}

El mensaje de error:

[C++ Error] UBanco.cpp(33): E2288 Pointer to structure required on left side of -> or ->*

Cual mi error... o interprete mal las lineas echas en Delphi ?
Sera el único error que encontre o habra más?
Alguien hizo el tutorial y lo pudo solucionar?

De antemano Gracias y suerte a todos los integrantes del "Club Delphi"
Saludos amigos...
Responder Con Cita