Orzobimbo

Utenti
  • Numero contenuti

    1
  • Iscritto

  • Ultima visita

Tutti i contenuti di Orzobimbo

  1. 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;