Italian community of Lazarus and Free Pascal

Programmazione => Generale => Topic aperto da: petrusic - Marzo 07, 2021, 06:02:45 pm

Titolo: fpspreadsheet - TsCellEdit
Inserito da: petrusic - Marzo 07, 2021, 06:02:45 pm
Riporto quanto trovato qui (https://wiki.freepascal.org/FPSpreadsheet_tutorial:_Writing_a_mini_spreadsheet_application#TsCellEdit):
Citazione
The typical spreadsheet applications provide a line for editing formulas or cell content. This is the purpose of the TsCellEdit.
Da ieri cerco di capire come leggere il contenuto "modificabile" di una cella di un foglio di calcolo LibreOffice. La cella contiene un valore numerico, risultato di una formula aritmetica del tipo "=12,5+11+100", solo che guardando la cella si legge il totale, cioè "123,50".

Attualmente io leggo il contenuto delle celle con:
Codice: [Seleziona]
cellaCorr:= foglioCorr.ReadAsText(xi,yi); 

pensando di ottenere la stringa che viene riportata nell'area di impostazione/modifica del contenuto di una cella, ho aggiunto a codesta riga di codice,  le seguenti:
Codice: [Seleziona]
procedure TForm1.PulsAvviaClick(Sender: TObject);
var
...
 cella: PCell;   
 formula: String;
begin
cella:=  foglioCorr.FindCell(xi, yi);
formula:= foglioCorr..ReadFormulaAsString(cella, True);
Invece è sbagliato, perchè non mi è stato restituito nessun valore.
Non so se qualcuno abbai già affrontato una casistica come la mia.