Отправляет email-рассылки с помощью сервиса Sendsay

Программирование. Форум !!!

За 2004-08-11

Re: Хранение и показ картинок (Delphi)

Andrey Yakushev пишет:

>Здравствуйте все.
>
>Задача такая:
>Надо в полях таблицы (Paradox) хранить картинки (gif, jpg, png) и
>потом отображать их в форме. Стандартный компонент TDBImage любит
>только bmp. Как можно решить эту проблемку?
>
>
>
Взять в делфе файлик jpeg.pas и нормально работать с jpg. Если надо, то
могу выслать в личку.

   Oleg Ponomarev 2004-08-11 20:10:16 (#209942)

Re: Проблема с Memo [Delphi]

Hello Lakmus,

Проблема в том, что ты забыл указать, кто у Memo1 родитель
(о чем тебе вежливо напомнил Delphi cообщением
"Bla-bla-bla Control has no parent window" :) ).
Проблему можно решить так:

procedure TForm1.FormCreate(Sender: TObject);
begin
Memo1:=TMemo.Create(Form1);
Memo1.Parent:=Self; {или Memo1.Parent:=Form1, кому как нравится}
Memo1.Lines.Add('why don't work?');
end;

   Cyberbob 2004-08-11 18:46:49 (#209904)

Re: Проблема с Memo [Delphi]

Здоровеньки булы, Lakmus!

11 августа 2004 г., среда, 16:54:16 (GMT+05:00), пришел ко мне
почтальон Почкин и всучил письмо с пометкой "Проблема с Memo [Delphi]",
в котором сообщалось следующее:

L> Вознила проблема. Не могу правльно инициализировать Memo.

L> Вот код. Я хочу создать Memo1 в процессе выполнения программы, но не знаю
L> как это правильно сделать. Код почему-то не работает. Подскажите как
L> правильно?

Не знаю как у тебя, а у меня при запуске этого кода вылетела RunTime
ошибка:
Control '' has no parent window -
Типа у контрола нету родителя

сие обозначает - что Memo1.Parent ничему не равняется (или равняется
мусору - точно не помню):

Memo1.Parent := Form1;

А эта строчка - Memo1:=TMemo.Create(Form1); указывает лишь владельца
(см. Help TCustomMemo.Create).

PS: Memo1:TMemo указать лучше в publiс, а не как глобальную
переменную.

   Томилов Александр 2004-08-11 18:37:31 (#209898)

Проблема с Memo [Delphi]

Hi all!

Вознила проблема. Не могу правльно инициализировать Memo.

Вот код. Я хочу создать Memo1 в процессе выполнения программы, но не знаю
как это правильно сделать. Код почему-то не работает. Подскажите как
правильно?

unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TForm1 = class(TForm)
procedure FormCreate(Sender: TObject);
end;
var
Form1: TForm1;
Memo1:TMemo;
implementation
{$R *.dfm}
procedure TForm1.FormCreate(Sender: TObject);
begin
Memo1:=TMemo.Create(Form1);
Memo1.Lines.Add('why don't work?');
end;
end.

Пока!
С уважением Lakmus
http://www.nvkz.kuzbass.net/lakmus

Номер выпуска : 3473
Возраст листа : 324 (дней)
Количество подписчиков : 461
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/209796
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписать: mailto:comp.soft.prog.prog-unsub@subscribe.ru

http://subscribe.ru/ http://subscribe.ru/feedback
@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@

-*Информационный канал Subscribe.Ru
Адрес подписки:
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписать: mailto:comp.soft.prog.prog--unsub@subscribe.ru

http://subscribe.ru/ http://subscribe.ru/feedback

   2004-08-11 15:15:09 (#209796)

Re: Требуется procedure GUID-generator; Можно в виде DLL али еще как....

>
> В VC требуется генерить GUID прямо в программе, свою собтвенную
> генерилку писать не очень логично если есть уже готовая.
> Вопрос есть ли где уже либо стандартная GUID-генерилка или кто-нить
> где-нить видел что либо уже подходящее...????????
> Заранее спасибо.
> --

В API, точнее OLE API есть функция CoCreateGuid(...)
Она все это делает...

*****************
* Алексеев А.В. *
*****************

Номер выпуска : 3472
Возраст листа : 324 (дней)
Количество подписчиков : 461
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/209724
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписать: mailto:comp.soft.prog.prog-unsub@subscribe.ru

http://subscribe.ru/ http://subscribe.ru/feedback
@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@

-*Информационный канал Subscribe.Ru
Адрес подписки:
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписать: mailto:comp.soft.prog.prog--unsub@subscribe.ru

http://subscribe.ru/ http://subscribe.ru/feedback

   2004-08-11 13:40:58 (#209724)

Требуется procedure GUID-generator; Можно в виде DLL али еще как....

В VC требуется генерить GUID прямо в программе, свою собтвенную
генерилку писать не очень логично если есть уже готовая.
Вопрос есть ли где уже либо стандартная GUID-генерилка или кто-нить
где-нить видел что либо уже подходящее...????????
Заранее спасибо.
--
geg***@y*****.ru Наша музыка: песни КиШ по гитару (ищу электронные сборники аккордов)

Номер выпуска : 3471
Возраст листа : 324 (дней)
Количество подписчиков : 461
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/209680
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписать: mailto:comp.soft.prog.prog-unsub@subscribe.ru

http://subscribe.ru/ http://subscribe.ru/feedback
@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@

-*Информационный канал Subscribe.Ru
Адрес подписки:
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписать: mailto:comp.soft.prog.prog--unsub@subscribe.ru

http://subscribe.ru/ http://subscribe.ru/feedback

   2004-08-11 13:02:29 (#209680)

Re[4]: Хранение и показ картинок (Delphi)

Здравствуйте, B..

> Я где-то видел классы TGif и TPng (кажется, так), они кажется потомки от TBitMap
> и можно сделать так:
> ImaneN.Picture.Bitmap := GifImage. Или что-то в это роде.
> Если хочешь, посмотрю подробнее (пиши в личку).
А будет ли эта штука показывать все три формата по очереди, в
зависимости от содержимого бинарной информации, которую я буду ей
подсовывать?

   Andrey Yakushev 2004-08-11 09:24:09 (#209524)

Re[4]: Хранение и показ картинок (Delphi)

Здравствуйте !

> AY> Я сейчас изгаляюсь через TWebBrowser
> Я где-то видел классы TGif и TPng (кажется, так), они кажется
> потомки от TBitMap

Как вариант - можно использовать WinAPI функции :
OleLoadPicture или
OleLoadPictureEx

только есть проблема - не во всех виндах они понимают Gif и Jpeg,
а о png, кажется, вообще не знают.

--
С уважением, Вахтуров Виктор.

Номер выпуска : 3469
Возраст листа : 324 (дней)
Количество подписчиков : 460
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/209455
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписать: mailto:comp.soft.prog.prog-unsub@subscribe.ru

http://subscribe.ru/ http://subscribe.ru/feedback
@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@

-*Информационный канал Subscribe.Ru
Адрес подписки:
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписать: mailto:comp.soft.prog.prog--unsub@subscribe.ru

http://subscribe.ru/ http://subscribe.ru/feedback

   2004-08-11 02:21:34 (#209455)