![]() |
Checkbox.Caption in Stringgrid
Liste der Anhänge anzeigen (Anzahl: 2)
Hallo!
Ich habe nen Problem! :-) Habe euch mal die screenshots mit reingepackt damit Ihr wisst worum es geht! Also ich möche dass wenn ich die Checkboxen auf aktiv setze die Caption ins Stringrid eingetragen wird! Dies funktioniert auch bei einem einzelnen Stringgrid nur hat man ja mehr fächer ne! und wie kann ich das also bei mehreren Stringgrids realisieren! so dass dann die fächer in der ersten spalte unter einander stehen jedoch bitte erst ab der zweiten zeile! Ich denke mal dass man das mit dem integerwert i realisieren kann weiß nur nicht wie! Könnt ihr mit dabei helfen? Wäre echt super ist extrem wichtig MFG Bruce86 |
Re: Checkbox.Caption in Stringgrid
:hi:
Wäre interessant, zu sehen, was Du bisher hast, aber so ungefähr kann es klappen:
Delphi-Quellcode:
Jetzt würden die Zeilen 2 bis 15 in der 1. Spalte mit der Caption von CheckBox1 gefüllt werden. Den Code kannst musst Du nur noch für deine Zwecke anpassen. Aber das ist nicht mehr so schwer und sollte zu schaffen sein :mrgreen:
var a,b : integer;
[...] for a := 2 to 15 do begin StringGrid1.Cells[1,a]:=CheckBox1.Caption; end; |
Re: Checkbox.Caption in Stringgrid
Zitat:
Denn hier wird in den Zeilen etwas eingtragen egal ob die Checkbox angekreuzt ist oder nicht. Du solltest die Checkboxen durchgehen (Stichwort: FindComponent) und wenn die Eigenschaft checked true ist die caption in das StringGrid eintragen. Grüße Klaus |
Re: Checkbox.Caption in Stringgrid
Deswegen sagte ich auch, dass er den Code für seine Zwecke anpassen muss ;)
Mein Post sollte eine Hilfestellung hierzu sein: Zitat:
|
Re: Checkbox.Caption in Stringgrid
also vllt formuliere ich das nochmal neu ihr seht ja im screenshot die fäche ran sich hat man 10 oder 11 stück davon und edes fach soll eine zeile zugeordnet werden also das mit dem eintragen einer caption klappt ja abe rnet so dass wenn ich diese 11 ode rso auswähle er sie dann auch untereinander schriebt und nicht jeder hat ja die gleichen fächer nehmen wir mal an ich lege chemie auf die zehnte zeile und ohysik auf die 11te und bio auf die 12 nun hat einer chemie und bio so würde die 1ote zeile freibleiben udn dass soll dabei vermieden werden!
Delphi-Quellcode:
so könnt eich das jetzt weiterführen für jede zeile für jede checkbox aber wenn ich alle 11 fächer so nehmen will wie ich sie habe dann muss das irgendwie anders gehen und denke mal dass man da mit ner variablen arbeiten muss nur wie???
procedure TForm1.Button1Click(Sender: TObject);
begin if checkbox1.checked then StringGrid1.Cells[1,0]:=checkbox1.Caption; end; end. das ist meine frage denn ansonsten wüprde eben wenn diese eine fach nicht angeklickt ist diese zeile frei blieeiben und mal ganz ehrlich welche rprogrammierer sieht sowas gern auch wenn es nur ein hobby ist? |
Re: Checkbox.Caption in Stringgrid
Hallo,
was ich meinte ist in ![]() Du mußt es nur etwas umbauen.
Delphi-Quellcode:
Grüße
for i := 1 to <Anzahl Checkboxen) do
begin if (FindComponent( "CheckBox' + IntToStr( i)) as TCheckBox).Checked then begin StringGrid1.RowCount:=StringGrid1.rowCount +1; StringGrid1.Cells[1,StringGrid1.rowCount-1]:=(FindComponent( "CheckBox' + IntToStr( i)) as TCheckBox).caption; end; end; Klaus |
Re: Checkbox.Caption in Stringgrid
Zitat:
|
Re: Checkbox.Caption in Stringgrid
Liste der Anhänge anzeigen (Anzahl: 1)
so ich habe das mal kopiert die anzahl de rchekcboxen angegeben nun gibt er mit diesen fehler aus und kann net compalieren(s. screenshot)
Klaus oder irgendjemand anders ne idee? |
Re: Checkbox.Caption in Stringgrid
Zitat:
Delphi-Quellcode:
StringGrid1.RowCount:=StringGrid1.rowCount +1;
|
Re: Checkbox.Caption in Stringgrid
Liste der Anhänge anzeigen (Anzahl: 1)
so sieht das schonmal beser aus will ja net klagen abe rein fehler hat er noch gefunden! vllt weißt ja warum scheinst dich ja auszukennen! *g*
Net bös sein find ich voll cool von dir das mir hilft und scheint ja vllt sogar zu klappen *smile* den fehle rmüssten wir vllt noch beseitigen(s.screenshot) glaueb diese screenshots sidn ganz hilfreich oder? |
Alle Zeitangaben in WEZ +1. Es ist jetzt 14:54 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz