Delphi 7 date de ieșire în ms cuvânt

Să revenim la concluzia din Word. Să mergem în ordine.

Nu uitați că pentru fiecare formă, în cazul în care datele de ieșire, este necesar să faceți toate aceste acțiuni. Dacă, desigur, ești un programator decent, atunci poți face o bibliotecă sau o clasă. Toate la discreția ta. Doar în caz, voi descrie în detaliu unde și ce să prescrie.







Deschideți codul pentru formularul dvs. și începeți.

În blocul "interfață" -> "utilizează", conectați modulele WordXP, ActiveX, ComObj.

În blocul de tip "interfață" -> "", descrieți procedura viitoare - procedura repl (cursa: șir; rpl: șir);

În blocul "interfață" -> "" public ", adăugați variabila - varianta MSWord:;

În blocul "implementare" -> după "", introduceți procedura.







Rețineți că TF_MAin este identificatorul meu de formă. Veți avea acest parametru diferit. Acesta poate fi văzut în "interfață" -> "tip" prima linie TF_MAin = clasă (TForm).

Care este sensul acestei proceduri. El găsește identificatori de cuvinte și le înlocuiește.

Nu uitați că în fișier trebuie să puneți aceste cuvinte în format. Numai în limba engleză și în astfel de paranteze. Deci, el nu înlocuiește accidental un alt text. De fapt, puteți înlocui orice cuvânt, numai uneori va fi plin. Și cu siguranță nu înlocuiți alt text.

Și astfel, hai să trecem la utilizarea acestei funcții.

Nu uitați că mai întâi trebuie să creați un fișier Word. Am creat fișierul "NameDoc.doc" din dosarul "report" și l-am scris în interiorul fișierului pentru al înlocui cu data de astăzi.

Observ că toate stilurile sunt păstrate, adică atunci când sunt înlocuite, vor fi caracterele boldate subliniate.

Să trecem la un exemplu mai complex - utilizarea tabelelor în șablonul nostru.

Am creat acest tabel în fișier:







Trimiteți-le prietenilor: