Salve a tutti, sono nuovo del forum e vorrei un aiuto per riuscire ad acquisire quello che scrivo dentro una casella di testo stringa che poi verrà salvata con SaveDialog, Invece con OpenDialog carichero i file salvati nella casella Display.Praticamente dovrei rendere l'ingresso PInput^[Leggi] come un read poi dovrei rendere l'uscita POutput^[stampa] come un write.
Ringrazio per l'attenzione.
Inserisco una parte della DLL
procedure CalculateEx(PInput, POutput, PUser: PDLLParams; PStrings: PStringParams);
// Routine è permanente
var
String_output: string;
String_input: string;
s: shortstring;
begin
if PInput^[i0] > 2.5 then
begin
s := ApriOpenDialog;
if s <> '' then
CaricaArrayDaFile(s, POutput);
end;
if PInput^[i1] > 2.5 then
begin
s := ApriSaveDialog;
if s <> '' then
SalvaArrayInFile(s, POutput);
end;
PInput^[Leggi] := strtofloat(String_input);
POutput^[stampa] := strtofloat(String_output);
end;