Ver Mensaje Individual
  #2 (permalink)  
Antiguo 21/10/2013, 12:22
noconsta
 
Fecha de Ingreso: octubre-2013
Mensajes: 2
Antigüedad: 11 años, 1 mes
Puntos: 0
Respuesta: hurgar en un formulario desde otro formulario

Retiro lo dicho, esta funcionando, solo falla en el constructor y derivados

Cita:
tablaclass::tablaclass(void){ //constructor
// form1->memo1.lines.add("constructor"); //no hay manera
// form1->memo1->lines->add("cons"); //tampoco
init();
}

void tablaclass::init(void){ //
// form1->memo1->lines->add("init"); //tampoco
strncpy(nombre," ",10); error='0';
stat=0; cntr=0;
reset();
}

void tablaclass::reset(void){ //
// form1->memo1->lines->add("reset"); //tampoco
max=0; min=0; sigma=0; palanca=0;
a=0; z=1; over_a=0; over_z=0;
for(ki=0;ki<dimension;ki++){ mat[ki]=0;}
}

void tablaclass::dump(void){ //
form1->memo1->lines->add("dump"); //aqui funciona
f=fopen(nombre,"wt"); /**/
fprintf(f,"\n %s",nombre);
fprintf(f,"\n error= \t%c",error); if(error!='0'){fprintf(f," e r r o r ! ! !");}
,,,,,,
fprintf(f,"\n over_a= \t%#1.6e",over_a); fprintf(f,"\n over_z= \t%#1.6e",over_z);
for(ki=0;ki<dimension;ki++){ fprintf(f,"\n%#1.6e",mat[ki]);}
fclose (f);
}

void tablaclass::error(char c){ //
form1->memo1->lines->add("error"); //y aqui
error=c; bit1(stat,bit_error);
}

void tablaclass::incre(double f, double i){ //
form1->memo1->lines->add("incre"); //y aqui
,,,,