Markierung von Text in StringGrid-Zelle umgehen

[kiar]

hallo vor dem ereignis ein

Delphi-Quellcode:

stext:='';

also

Delphi-Quellcode:

var
   sText: String;
begin
 sText:= '';
if (key in ['0'..'9') and (length(StringGrid1.Cells[aktCellX,aktCellY]) = 0) then
  begin
   StringGrid1.Cells[aktCellX,aktCEllY] := '+' + key;
   key := #0;
  end;
end;

/// mann dicke finger