StringGrid + celdas

[Makiley]

Hola a todos!
Pues os comento... Estoy haciendo una pequeña aplicacion en delphi y en una parte del programa estoy usando un striggrid y necesito que cuando marque una casilla me salga un texto ( eso lo e conseguido ) pero tambien necesito que cuando vuelva a marcar esa casilla, el texto k habia en ella se borre.
Tengo un StringGrid de 10x10, por si sirve de algo que lo sepais.
Muchas gracias de antemano!

[eliash]

Yo probaría el evento OnSelecCell, utilizando la columna y fila que te devuelve para pasarle a la SG el método que corresponda.
Puedes crear un Set (por ejemplo "Estado") que diga cuando el evento tiene que escribir, borrar, etc...

 procedure TForm1.StringGrid1SelectCell(Sender: TObject; ACol,
  ARow: Integer; var CanSelect: Boolean);
begin
//si Estado es Escribir, escribir en la celda especificada por ACol y ARow
//si Estado es Borrar, borrar la celda especificada por ACol y ARow
end;

[Makiley]

Yaaa, ese es el que estoy usando. Pero el caso es que no se como se vacia una celda del StringGrid, y como saber si esta marcada. He intentando usar una variable booleana pero no ma funcionao.
Esto es lo que tengo hecho. Es una especie de programa para unos multicines.

procedure TForm3.StringGrid1SelectCell(Sender: TObject; ACol,
ARow: Integer; var CanSelect: Boolean);
begin
porcentaje:=porcentaje+1;
Edit1.Text:=IntToStr(porcentaje);
StringGrid1.Cells[ACol,ARow]:='Ocupado';
CanSelect:=False;
ProgressBar1.StepBy(1);
caja:=caja+ENTRADA;
end;

Supuestamente cuando desmarque una casilla, la barra de prograso tiene k disminuir, y cuando la marque tiene que aumentar.

Muchas gracias!!

[Makiley]

Esque realmente lo que tiene que hacer el programa es que cuando marque una casiila me apareza E2, F6, etc, en plan como el juego de los barquitos, donde A,B,C etc son las columnas y 1,2,3 etc son las filas.
Por eso cuando marque una casilla y me salga el E1 por ejemplo, necesito que cuando se vuelva a marcar, esta se kede vacia.
Supuestamente todas esas casillas son asientos de cine, y cuando una marcos una casilla, se cobra la entrada, pero cuando le vuelvo a dar, tengo que devolver el dinero.

Gracias por las molestias!

[Neftali [Germán.Estévez]]

...me suena a práctica de la facul...