Objekte der VLX/CLX in Unterfunktionen verfügbar machen

b43r_3oo3

Hi,

wie kann ich einen Radio Button oder ähnliches in Unterfunktionen zur Verfügung stellen?

Bsp.: rbut_0 - _2 seien vom Typ TRadioButton und ich möchte die in der Funktion mit all ihren Eigenschaften und Methoden zur Verfügung stellen.

int aa = 0, bb = 0, wu = 0, erg[9];
bool ueberlauf = false, rb0 = true, rb1 = false, rb2 = false, norb = false;
AnsiString ff = "";

//Funktion Weiter button-----------------------------------------------------

void next_but()
{   
  if (norbchk(rb0, rb1, rb2)) return;
  wu = rbwert(rb0, rb1, rb2);
  erg[aa] += wu;
  ueberlauf = uebrlaufa(aa, ueberlauf);
  aa = questa(aa, ueberlauf);
  ff = fragen_typ[aa][bb];
  if (ff == "") next_but();                	  //falls kein Satz vorhanden
  bb = questb(aa, bb);
}
//Weiter Button--------------------------------------------------------------

void __fastcall Tmainform::but_weiterClick(TObject *Sender)
{
  rb0 = rbut_0->Checked;
  rb1 = rbut_1->Checked;
  rb2 = rbut_2->Checked;
  next_but();
  text_fragen->Text = ff;
  rbut_0->Checked = false;
  rbut_1->Checked = false;
  rbut_2->Checked = false;
}

a) Die Unterfunktion als Methode in die Klasse aufnehmen

b) Den Namen der Klasse (Formular) vornewegschreiben Formualr->rb0..

b43r_3oo3

DANKE!! (Manchmal ist es so einfach, m drauf zu kommen (mit KLassen arbeite ich NOCH nicht, da ich mich da noch nicht 100%ig auskenne und trozdem stabile Software liefern muss))

Braunstein

b43r_3oo3 schrieb:

DANKE!! (mit KLassen arbeite ich NOCH nicht, da ich mich da noch nicht 100%ig auskenne)

Was glaubst du denn was TmainForm ist? Richtig, eine Klasse.

BigNeal

TRadioButton erwähnen wir gar nicht