Buenas Tardes, el problema que tengo es que estoy preparando una clase donde vamos a aplicar el método simplex, un metodo de Invetigación de Operaciones, se entra por un form si se va a Maximizar o Minimizar, el número de variables y restricciones, coeficientes de etos últimos datos que se entran por dos StringGrid y que despues se agrupan en un tercero, en codigo:
Código PHP:
StringGrid1->Cells[0][1]="COEF.";
StringGrid1->ColCount=StrToInt(Edit2->Text)+1;
StringGrid2->ColCount=StrToInt(Edit2->Text)+3;
StringGrid2->RowCount=StrToInt(Edit3->Text)+1;
for(i=1;i<=StrToInt(Edit2->Text);i++){
StringGrid1->Cells[i][0]=" X "+IntToStr(i);
StringGrid2->Cells[i][0]=" X "+IntToStr(i);
}
StringGrid2->Cells[StrToInt(Edit2->Text)+1][0]="Signo";
StringGrid2->Cells[StrToInt(Edit2->Text)+2][0]="PD";
for(j=1;j<=StrToInt(Edit3->Text);j++){
StringGrid2->Cells[0][j]=" C "+IntToStr(j);
if(RadioButton1->Checked){ //simplex puro
StringGrid2->Cells[StrToInt(Edit2->Text)+1][j]="<=";
Button2->Enabled=true;
}
else if(RadioButton2->Checked){ //existen varias complicacioes+mimizado
Button3->Enabled=true;
}
else{
Button4->Enabled=true; // varias complicaciones maximizado
}
}
ahora se pasa por un boton a un groupbox, para no salir del forma inicial, donde:
int i,j,k,m;
StringGrid3->ColCount=StrToInt(Edit2->Text)+StrToInt(Edit3->Text)+2;
StringGrid3->RowCount=StrToInt(Edit3->Text)+2;
StringGrid3->Cells[0][0]=" VB";
StringGrid3->Cells[0][1]=" Z";
for(i=1;i<=StrToInt(Edit3->Text);i++){
StringGrid3->Cells[0][i+1]=" C"+IntToStr(i);
}
for (j=1;j<=StrToInt(Edit2->Text);j++){
StringGrid3->Cells[j][0]=" X"+IntToStr(j);
}
for(m=1;m<=StrToInt(Edit3->Text);m++){
StringGrid3->Cells[StrToInt(Edit2->Text)+m][0]=" C"+IntToStr(m);
}
StringGrid3->Cells[StrToInt(Edit2->Text)+StrToInt(Edit3->Text)+1][0]=" PD";
[b]//cargar valores de los stringrid 1 y 2 en el 3 y ejecutar ' mi problema[/b]
GroupBox1->Visible=true;