AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

RadioGroup zur Laufzeit

Ein Thema von Privateer3000 · begonnen am 12. Aug 2003 · letzter Beitrag vom 13. Aug 2003
Antwort Antwort
Benutzerbild von Privateer3000
Privateer3000

Registriert seit: 10. Jun 2002
Ort: Jena
1.128 Beiträge
 
Delphi 10.4 Sydney
 
#1

RadioGroup zur Laufzeit

  Alt 12. Aug 2003, 13:57
Hiho,
kann mir bitte jemand ein praktisches Beispiel
zum erzeugen und benennen von Radio's in einer
Radiogroup schreiben?
Zusaätzlich würde mich ein Beispiel zum Erzeugen von
TEdits interessieren. Und zwar sollten zB. 10 untereinander
als Spalte danach eine neue Spalte erzeugt werden.

Danke für Eure Hilfe
Peter
+++Versuch es nicht mit Gewalt + Nimm einen größeren Hammer! +++
  Mit Zitat antworten Zitat
Benutzerbild von alcaeus
alcaeus

Registriert seit: 11. Aug 2003
Ort: München
6.537 Beiträge
 
#2

Re: RadioGroup zur Laufzeit

  Alt 12. Aug 2003, 14:10
Ne Radiogroup ist fast gleich wie eine ListBox: In der TStrings-Eigenschaft Items sind die einzelnen Radios abgespeichert (Jede Zeile stellt einen Button dar). Um einen Radio hinzuzufügen musst du nur schreiben:
RadioGroup1.Items.Add('Button'); Mit ItemIndex kannst du dann ein Radio auswählen.
Andreas B.
Die Mutter der Dummen ist immer schwanger.
Ein Portal für Informatik-Studenten: www.infler.de
  Mit Zitat antworten Zitat
Tpercon

Registriert seit: 7. Jun 2002
638 Beiträge
 
Delphi 5 Professional
 
#3

Re: RadioGroup zur Laufzeit

  Alt 12. Aug 2003, 14:17
Hier mla nen Beispiel:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var i, y: integer;
    myedit: TEdit;
begin
  for i := 0 to 35 do begin
    if i mod 10 = 0 then y := 20
    else inc (y, 20);
    myedit := TEdit.Create(nil);
    myedit.Parent := TWinControl(Form1);
    myedit.Left := i div 10 * 50;
    myedit.Top := y;
    myedit.Height := 20;
    myedit.Width := 40;
    myedit.Name := 'Edit'+InttoStr(i);
    myedit.Text := 'Edit'+InttoStr(i);
  end;
end;
  Mit Zitat antworten Zitat
Benutzerbild von Privateer3000
Privateer3000

Registriert seit: 10. Jun 2002
Ort: Jena
1.128 Beiträge
 
Delphi 10.4 Sydney
 
#4

Re: RadioGroup zur Laufzeit

  Alt 13. Aug 2003, 09:03
Vielen Dank Leute!
Auf Euch ist immer Verlass 8)
Peter
+++Versuch es nicht mit Gewalt + Nimm einen größeren Hammer! +++
  Mit Zitat antworten Zitat
Benutzerbild von Luckie
Luckie

Registriert seit: 29. Mai 2002
37.621 Beiträge
 
Delphi 2006 Professional
 
#5

Re: RadioGroup zur Laufzeit

  Alt 13. Aug 2003, 09:25
Warum der Cast nach TWinControl beim Parent? Form1 sollte doch schon eins sein?
Diese Zeile ist auch recht interessant:
myedit.Left := i div 10 * 50; Wie wäre es mit:
myedit.Left := i div 5; Oder hat der div-Operator eine höhere Priorität als *?
Michael
Ein Teil meines Codes würde euch verunsichern.
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 19:56 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz