Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2003.12.12;
Скачать: [xml.tar.bz2];

Вниз

jedi&gif   Найти похожие ветки 

 
TUser   (2003-12-01 16:16) [0]

Знаю, что в RxLib можно работать с GIF картинками. По идее в JEDI тоже должен быть какой-нибудь компонент типа JvGIFImage. Кто знает, - подскажите, на какой он закладке лежит и как его точно зовут.


 
Ru   (2003-12-01 17:22) [1]

JvControls > JvGifAnimator


 
TUser   (2003-12-03 05:44) [2]

За GifAnimator спасибо большое. Нужная вещь. Я рядом с ним покопал - накопал для себя неплохой класс TJvGIFImage для хранения GIF-картинок. Собственно - то, что надо. Но у него отказывается работать метод SaveToFile. Выглядит, вроде, как вполне обычный метод, аналогичный таковому у TBitMap и иже с ним. Но в файл записывает не мою картинку, а какую-то лажу. При этом в GIFAnimator"е все отображается корректно. Для теста использовал такой код:

var
Form1: TForm1;
g:TJvGIFImage;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
var b:TBitMap;
begin
if opendialog1.Execute then begin

b:=TBitMap.Create;
b.LoadFromFile(opendialog1.FileName);
g.AddFrame(b);
image1.Picture.Bitmap:=g.Frames[0].Bitmap;
b.Free;
end;
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
if colordialog1.Execute then begin
g.Frames[0].TransparentColor:=colordialog1.Color;
jvGIFAnimator1.Image:=g;
g.DecodeAllFrames;
g.SaveToFile("c:\giffile.gif");
end;
end;

begin
g:=TjvGIFImage.Create;
end.


 
TUser   (2003-12-03 11:00) [3]

Кто-нибудь юзал JEDI/Rx?


 
Ru   (2003-12-03 11:23) [4]

>TUser © (03.12.03 11:00) [3]

я постоянно его использую, только не этот компонент


 
Amoeba   (2003-12-03 12:31) [5]

Посмотри библиотеку GraphicEx (бесплатно с исходниками):
http://www.delphi-gems.com/Graphics.php



Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2003.12.12;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.082 c
1-36596
Фагот
2003-12-01 15:54
2003.12.12
DateEdit комонент


3-36546
Shirson
2003-11-19 11:14
2003.12.12
Странное поведение Query


8-36774
Sergeys
2003-08-16 13:39
2003.12.12
С микшировать два битмапа


11-36587
mike.dld
2003-03-27 02:34
2003.12.12
Глюк


1-36708
timak
2003-12-02 15:48
2003.12.12
Помогите найти QRStringGrid





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский