Vă mulțumim pentru cursul minunat!
În lucrarea independentă numărul 2, când compilam modulul MyCript.pas (OS: Windows 7 x64, Lazarus 1.4 win64), se generează o eroare pentru codul de asamblare
mycript.pas (54,5) Eroare: Asm: [push reg32] combinație nevalidă de opcode și operanzi
mycript.pas (95,5) Eroare: Asm: [pop reg32] combinație nevalidă de opcode și operanzi
Înțeleg că cursul era pregătit pentru OS-uri pe 32 de biți, dar despre sistemele pe 64 de biți?
În procesoarele elementelor de meniu FileCreate și FileOpen, precum și în manualul de închidere a formularului OnClose, aceste trei proceduri conțin același cod
înainte de a crea un text nou>
dacă începe Memo1.Modified
// dacă utilizatorul este de acord să salveze modificările:
dacă MessageDlg ("Salvați fișierul"
"Fișierul curent a fost modificat. Salvați modificările? ',
mtConfirmation, [mbYes, mbNo, mbIgnore], 0) = mrYes atunci
FileSaveClick (Expeditor);
se încheie; // dacă
Permiteți-mi să întreb: nu ar fi mai bine să puneți codul într-o procedură separată, de exemplu - în cazul unui handler al evenimentului OnCloseQuery? În ceea ce îmi amintesc din experiența Delphi, chemarea acestei proceduri în sine nu trebuie să ducă la închiderea formularului. Deci, poate fi folosit în procedurile de curățare a Memo1 și citirea din fișier. Sau în Lazăr este imposibil de făcut?