
(*
 Delphi Object and Component Reference
# {bmc bm9.BMP} OnGetEditText example
The following code lowercases the text for a string grid cell when the user begins to edit it.
*) 
void __fastcall TForm1::DrawGrid1GetEditText(TObject *Sender, long ACol, long ARow, AnsiString &Value)
{
  Value = AnsiLowerCase(Value);
} 
