Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Christian S.,
2. Mai 2003
@Keldorn: Du hast völlig recht. Da habe ich gar nicht dran gedacht. Da ist Deine Lösung dann wirklich vorzuziehen.
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Christian S.,
2. Mai 2003
Bei der Sache mit OnExitCell muss ich passen. Du könntest im OnDrawCell-Ereignis abfragen, ob in der letzten Zeile was steht und wenn dem so ist, noch eine dran hängen.
Eine Zeile löschen kannst Du, glaube ich, nur, wenn Du alle nachfolgenden Zeilen eins nach oben verschiebst und dann den RowCount um eins erniedrigst.
MfG,
Peter
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Christian S.,
2. Mai 2003
Du könntest es so machen:
procedure TForm1.StringGrid1SelectCell(Sender: TObject; ACol,
ARow: Integer; var CanSelect: Boolean);
const erlaubt = ;
begin
if not (ACol in Erlaubt) THEN CanSelect:=False;
end;