paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-11-02 16:39:56 +01:00
Code Issues Packages Projects Releases Wiki Activity

- non used readers removed

Browse Source 
git-svn-id: trunk@6084 -
This commit is contained in:
mazen 2004-09-28 16:36:14 +00:00
parent ead8badfb4
commit 147197bdf5
2 changed files with 0 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
components/images/lazbmp.pas
View File

@ -50,8 +50,6 @@ implementation
{ TBMPImage }
procedure TBMPImage.InitFPImageReader(ImgReader: TFPCustomImageReader);
var
BMPReader: TFPReaderBMP;
begin
if ImgReader is TFPReaderBMP then begin
end;
@ -59,8 +57,6 @@ begin
end;
procedure TBMPImage.FinalizeFPImageReader(ImgReader: TFPCustomImageReader);
var
BMPReader: TFPReaderBMP;
begin
if ImgReader is TFPReaderBMP then begin
end;

5
components/images/laztga.pas
View File

@ -49,8 +49,6 @@ implementation
{ TTGAImage }
procedure TTGAImage.InitFPImageReader(ImgReader: TFPCustomImageReader);
var
TGAReader: TFPReaderTarga;
begin
if ImgReader is TFPReaderTarga then begin
end;
@ -58,11 +56,8 @@ begin
end;
procedure TTGAImage.FinalizeFPImageReader(ImgReader: TFPCustomImageReader);
var
TGAReader: TFPReaderTarga;
begin
if ImgReader is TFPReaderTarga then begin
TGAReader:=TFPReaderTarga(ImgReader);
end;
inherited FinalizeFPImageReader(ImgReader);
end;