RadioButton i index

procedure TForm1.FormCreate(Sender: TObject);
begin
lblChekUser.Caption := '';
end;

procedure TForm1.rbJohnClick(Sender: TObject);
begin
if rbJohn.Checked = TRUE then
lblChekUser.Caption := rbJohn.Caption else
lblChekUser.Caption := '';
end;

procedure TForm1.rbAndersClick(Sender: TObject);
begin
if rbAnders.Checked = TRUE then
lblChekUser.Caption := rbAnders.Caption else
lblChekUser.Caption := '';

end;

Kan også gøres mere enkelt...

procedure TForm1.FormCreate(Sender: TObject);
begin
lblChekUser.Caption := '';
end;

procedure TForm1.rbJohnClick(Sender: TObject);
begin
lblChekUser.Caption := rbJohn.Caption;
end;

procedure TForm1.rbAndersClick(Sender: TObject);
begin
lblChekUser.Caption := rbAnders.Caption;
end;

;)
//'bramsing'

Det var jo smartere måde;), men jeg forklarede det måske forkert,
Når man f.eks. har måske 50 brugere bliver der jo en del programmering, hvad jeg mente var i et array, så man kunne lave noget med : for 1 to Antalbrugere do "something"??

Jeg er ikke helt med... Hvordan finder du frem til hvilken bruger der bruger programmet.. Det jeg mener er.. Skriver brugeren sit navn i en Editbox??? eller Vælger han via combobox??? Eller???
Prøv at uddybe det lidt...

Indsæt en RadioGroup fra standard-fanen, den har index :-)

Nu ved jeg jo ikke helt hvad din plan er... Men måske det er nemmere med en ComboBox end med RadioButtons...

//----------------------------------

procedure TForm1.FormCreate(Sender: TObject);
begin
Combobox1.Items.LoadFromFile('c:\Brugerliste.txt');
end;

procedure TForm1.ComboBox1Select(Sender: TObject);
begin
Label1.Caption := ComboBox1.Text;
end;

//-----------------------------------

Bare en idé...

Ideen er at der findes en række radiobuttons med brugernavne udfor, den pågældende bruger skal så markere hvem brugeren er, da brugernavnet skal indgå i en elektronisk ordrebehandling, jeg har lavet programmet så det virker, jeg ville bare smuksere koden.
Mit store problem er at jeg er forholdsvis habil pascal programmør men kender ikke ret meget til delphi. I firmaet har jeg lavet masser af programmer til konvertering af leverandørdata, så vores administrative program kan læse det, nu ville jeg bare oversætte det hele til Delphi. Jeg har prøvet med nogle bøger men jeg har ligesom ikke fundet rytmen, så går det straks bedre med små letforståelige programstumper. I første omgang når jeg nok ikke længere her, jeg må så arbejde videre og så lære det hen ad vejen, men tak for kampen.