Această versiune localizată intră direct în Using PDFium Component in Delphi for side-by-side comparison of PDF documents ș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
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
Note suplimentare
Această completare transformă versiunea scurtă într-un ghid de lucru mai util și rămâne aliniată cu Using PDFium Component in Delphi for side-by-side comparison of PDF documents și cu baza tehnică din articolul englez. Textul trebuie să arate clar cu ce tip de intrare pornește tema, ce rezultat este așteptat și în ce punct trebuie confirmat comportamentul prin validation
La rescriere contează ordinea deciziilor: mai întâi forma datelor, apoi limita schimbării, după aceea dependențele API și, la final, comportamentul rezultat. Dacă articolul menționează mai multe opțiuni, merită explicat și ce variantă este mai ușor de susținut în maintenance, support și în reproducerea unei probleme
Orice code block, nume de fișier, nume de API și valoare literal trebuie să rămână neschimbate. Explicația din jur poate fi mai amplă, dar exemplul de cod trebuie să fie o referință exactă, astfel încât cititorul să îl poată compara direct cu proiectul lui Delphi, C++Builder sau Lazarus/FPC
Secțiunea de validation ar trebui să menționeze un fișier de intrare mic, compararea rezultatului și notarea versiunii de component sau validator. Dacă pagina descrie un bug fix sau o migrare, traseul de reproducere, starea observată inițial și punctul de confirmare trebuie spuse clar, ca să poată fi urmărită orice regression fără presupuneri
O astfel de extindere face pagina utilă și după prima lectură: pentru reviewer ca explicație a deciziei, pentru support ca fundal de diagnostic și pentru echipa de întreținere ca notă de referință înainte de modificările viitoare
- Nu schimba numele produselor, API-urilor, fișierelor sau valorile literal
- Păstrează code block-urile exact așa cum sunt
- Descrie validation cu fișier de probă și rezultat comparabil
- Explică ordinea deciziilor, nu doar un rezumat foarte scurt
Exemple de cod suplimentare
procedure TFormMain.UpdateLayout;
var
TotalWidth: Integer;
begin
TotalWidth := ClientWidth;
if ThreeViewMode then
begin
ScrollBox3.Visible := True;
ScrollBox1.Left := 0;
ScrollBox1.Width := TotalWidth div 3;
ScrollBox2.Left := ScrollBox1.Width;
ScrollBox2.Width := TotalWidth div 3;
ScrollBox3.Left := ScrollBox2.Left + ScrollBox2.Width;
ScrollBox3.Width := TotalWidth - ScrollBox3.Left;
// Apply the same (ClientHeight - toolbar height) to all three Height values
end
else
begin
ScrollBox3.Visible := False;
ScrollBox1.Left := 0;
ScrollBox1.Width := TotalWidth div 2;
ScrollBox2.Left := ScrollBox1.Width;
ScrollBox2.Width := TotalWidth - ScrollBox2.Left;
end;
end;procedure TFormMain.OpenPdfFile(PdfComponent: TPdf;
PdfViewComponent: TPdfView);
var
Password: string;
begin
if not OpenDialog.Execute then
Exit;
PdfComponent.Active := False;
PdfComponent.FileName := OpenDialog.FileName;
PdfComponent.Password := '';
try
PdfComponent.Active := True;
except
on E: EPdfError do
begin
if InputQuery('Password', 'Enter document password:', Password) then
begin
PdfComponent.Password := Password;
PdfComponent.Active := True;
end
else
raise;
end;
end;
if PdfComponent.Active then
begin
PdfViewComponent.PageNumber := 1;
SetActivePdfView(PdfViewComponent);
end;
end;procedure TFormMain.ApplyZoomToAll(NewZoom: Double);
begin
if PdfView1.Active then PdfView1.Zoom := NewZoom;
if PdfView2.Active then PdfView2.Zoom := NewZoom;
if ThreeViewMode and PdfView3.Active then PdfView3.Zoom := NewZoom;
end;procedure TFormMain.SaveActiveViewAsImage;
var
Pdf: TPdf;
Bmp: TBitmap;
Jpeg: TJpegImage;
begin
if not Assigned(FActivePdfView) or not FActivePdfView.Active then
Exit;
Pdf := FActivePdfView.Pdf;
Pdf.PageNumber := FActivePdfView.PageNumber;
Bmp := Pdf.RenderPage(
0, 0,
Round(Pdf.PageWidth * 2),
Round(Pdf.PageHeight * 2),
FActivePdfView.Rotation, [], clWhite);
try
if SavePictureDialog.Execute then
begin
Jpeg := TJpegImage.Create;
try
Jpeg.Assign(Bmp);
Jpeg.CompressionQuality := 90;
Jpeg.SaveToFile(SavePictureDialog.FileName);
finally
Jpeg.Free;
end;
end;
finally
Bmp.Free;
end;
end;