Einzelnen Beitrag anzeigen

Benutzerbild von stahli
stahli

Registriert seit: 26. Nov 2003
Ort: Halle/Saale
4.343 Beiträge
 
Delphi 11 Alexandria
 
#2

AW: [FireMonkey2] CheckBox in T(String)Grid

  Alt 21. Okt 2012, 16:11
Ich habe hier ein paar Infos gefunden: http://monkeystyler.com/blog/entry/f...ls-and-columns

Der Ansatz von FM ist ja nicht schlecht, aber es ist (zumindest für mich) schwierig, mit der Arbeitsweise vertraut zu werden.

Im ersten Teil des Beispiels wird DblClick nur für leere Zellen aufgerufen, da sonst das integrierte Edit den Click abfängt.
Im zweiten Teil ist es mir noch nicht gelungen, auf die Änderung zu reagieren. Letztlich würde ich unterschiedliche SQL-Anweisungen an die Datenbank schicken wollen, abhängig davon ob eine 0 oder 1 in die Zelle eingetragen (später eine Checkbox de- oder gecheckt) wird.

Delphi-Quellcode:
procedure TFormFMM.GridContractDetailsPersonsDblClick(Sender: TObject);
var
  Grid: TGrid;
begin
  Grid := (Sender as TGrid);
  if (Grid.Selected > 0) and (Grid.ColumnIndex = 4) then
  begin
    Beep;
  end;
end;

procedure TFormFMMM.GridContractDetailsPersonsEditingDone(Sender: TObject;
  const Col, Row: Integer);
var
  Grid: TGrid;
  Cell: TStyledControl;
begin
  if (Row > 0) and (Col = 4) then
  begin
    Grid := (Sender as TGrid);
    // Cell := Grid.ColumnByIndex(Col).CellControlByRow(Row); ???
    // MyValue := Cell.Text; ???
    Beep;
  end;
end;
Ich denke, FM hat ein großes Potential, aber ohne viele Tutorials und Videos wird sich das schwer durchsetzen.
Die Hilfe ist ja auch noch äußerst löchrig.
Stahli
http://www.StahliSoft.de
---
"Jetzt muss ich seh´n, dass ich kein Denkfehler mach...!?" Dittsche (2004)
  Mit Zitat antworten Zitat