Einzelnen Beitrag anzeigen

plautzer

Registriert seit: 23. Aug 2003
172 Beiträge
 
#36

Re: Property "Objects" im Stringgrid

  Alt 19. Feb 2005, 12:42
mahlzeit,

freigeben: aber erst beim schließen der Programms, oder? Was passiert wenns man's nicht macht?`

Wenn einen Zelle bearbeitet wird, bekommt sie eine Object 'editiert'.

Delphi-Quellcode:
procedure TForm1.AddeditObjectToGrid(ACol, ARow : integer);
var st_grid:tgrid;
begin
  reihe := Treihe.Create;
  reihe.editiert := editiert;
  Form1.st_grid.Objects[ACol, ARow] := reihe;
end;
wie kann ich nun aus lesen, welche zelle in welchen grid dieses object hat?
Nil ist mir schon bekannt, aber ganz bekommen ich das nicht hin.

Delphi-Quellcode:
function TForm1.TestForEditiert(ACol, ARow : integer; grid: TStringgrid):boolean;
var st_grid:tgrid;
begin
    if grid.Objects[ACol, ARow] <> nil then begin
  reihe := Treihe(grid.Objects[ACol, ARow]);
  result := reihe.editiert;
  end
  else
    result := false;
end;
Per buttonclick soll mit allen editierten zellen irgentwas passieren, z.b. das objekt nr an eine listbox abgeben werden. Könnt ihr mir da nochmal aushelfen?

Thx,

Plautzer
  Mit Zitat antworten Zitat