Articol tehnic: Generate Excel Files in Delphi Without Office Automation în română

Această versiune localizată intră direct în Generating Excel Files in Delphi Without Office Automation și folosește articolul englez actualizat ca reper tehnic pentru echipele Delphi, PDF și software documentar

Pagina transformă articolul de bază actualizat în puncte concrete de control pentru proiectare, implementare și validare

Ce a fost sincronizat din articolul englez

Textul de bază în engleză a fost extins cu context de implementare, decizii tehnice și exemple concrete, astfel că pagina trebuie citită ca un ghid de lucru, nu ca un rezumat scurt

Secțiuni importante din articolul de bază actualizat:

• Folosește mai întâi fișiere mici de intrare, ușor de reprodus
• Păstrează neschimbate numele produselor, API-urilor, fișierelor și valorile literale
• Salvează ieșirea validatorului și informațiile de versiune împreună cu fișierul eșantion generat

Alegeri practice de implementare

Pornește de la tipul de fișier, rezultatul așteptat și starea de eroare care trebuie afișată utilizatorului. Leagă apoi fiecare apel API de un rezultat verificabil, astfel încât validarea, logarea și suportul să poată reproduce cazul clientului

• Folosește mai întâi fișiere mici de intrare, ușor de reprodus
• Păstrează neschimbate numele produselor, API-urilor, fișierelor și valorile literale
• Salvează ieșirea validatorului și informațiile de versiune împreună cu fișierul eșantion generat

Cod și repere API

Exemplele de cod sunt păstrate neschimbate pentru ca dezvoltatorii să le poată compara direct cu proiecte Delphi, C++Builder și Lazarus/FPC

var
  Book: IXLSWorkbook;          // interface reference: released automatically
  Sheet: IXLSWorksheet;
  BookX: TXLSXWorkbook;        // plain object: you free it
  SheetX: TXLSXWorksheet;
begin
  // BIFF8 .xls output - no Free; the interface refcount owns it
  Book := TXLSWorkbook.Create;
  Sheet := Book.Sheets.Add;
  Sheet.Name := 'Report';
  Sheet.Cells.Item[1, 1].Value := 'Generated without Excel';
  Book.SaveAs('report.xls');

  // OOXML .xlsx output - explicit lifetime
  BookX := TXLSXWorkbook.Create;
  try
    SheetX := BookX.Sheets.Add('Report');
    SheetX.Cells[1, 1].Value := 'Generated without Excel';
    BookX.SaveAs('report.xlsx');
  finally
    BookX.Free;
  end;
end;

Mem := TMemoryStream.Create;
Book := TXLSXWorkbook.Create;
try
  Sheet := Book.Sheets.Add('Data');
  Sheet.Cells[1, 1].Value := 'Generated ' + DateTimeToStr(Now);
  Book.SaveAs(Mem);          // writes from the CURRENT stream position
  Mem.Position := 0;         // rewind before handing the stream over
  Response.ContentType :=
    'application/vnd.openxmlformats-officedocument.spreadsheetml.sheet';
  Response.ContentStream := Mem;   // the framework now owns Mem
finally
  Book.Free;
end;

SheetX.Cells[1, 1].Value := 1200;
SheetX.Cells[2, 1].Value := 950;
SheetX.Cells[3, 1].Formula := 'SUM(A1:A2)';   // XLSX facade: no '=' prefix
Total := BookX.Calculate('SUM(A1:A2)');       // evaluate on the server, now
if Total <> 2150 then
  raise Exception.Create('reconciliation failed before delivery');

Verificare înainte de publicare

Verifică fișierul de ieșire cu aceleași instrumente pe care le va folosi clientul sau arhiva. Notează versiunea componentei, datele de test, versiunea validatorului și rezultatul observat pentru a urmări precis o regresie ulterioară

Lecturi conexe

• database-to-workbook export patterns
• large-workbook performance techniques
• template report generation walkthrough