Часовой пояс: UTC + 3 часа




Начать новую тему Новая тема / Ответить на тему Ответить  Сообщений: 2317 • Страница 46 из 116<  1 ... 43  44  45  46  47  48  49 ... 116  >
  Пред. тема | След. тема 
В случае проблем с отображением форума, отключите блокировщик рекламы
Автор Сообщение
 

Adminus Overclockerus
Adminus Overclockerus
Статус: Не в сети
Регистрация: 11.10.2002
Откуда: Default
Фото: 0
Ray Adams
А можно поподробнее с этого момента?
Lord_of_Darkness
Lord_of_Darkness писал(а):
Может у картинки фон "грязный"?

Что значит "грязный"?
Я напрямую указываю TransparentColor - всё равно не помогает.

Вот, закачал картинки:
http://cp.people.overclockers.ru/cgi-bi ... images.rar



Партнер
 

Member
Статус: Не в сети
Регистрация: 03.01.2004
Откуда: Питер
Mech
Цитата:
Что значит "грязный"?
Ну неоднородный... Вот посмотрел на твои картинки - вроде с фоном ок все.
PS вот залил свой сырец, у меня он пашет нормально.

_________________
Здесь так мало тех, с кем легко говорить,
Еще меньше тех, с кем не страшно молчать (c)


 

Member
Статус: Не в сети
Регистрация: 23.06.2004
Откуда: Минск
проблему решил

_________________
MESS WITH THE BEST
DIE LIKE THE REST


Последний раз редактировалось VidocQ 19.10.2005 2:28, всего редактировалось 1 раз.

 

Adminus Overclockerus
Adminus Overclockerus
Статус: Не в сети
Регистрация: 11.10.2002
Откуда: Default
Фото: 0
Lord_of_Darkness
У меня твоё работает так:
http://images.people.overclockers.ru/41099.gif
:(


 

Member
Статус: Не в сети
Регистрация: 05.01.2005
Mech
Mech писал(а):
Lord_of_Darkness
У меня твоё работает так:
http://images.people.overclockers.ru/41099.gif
:(

Тоже попробовал - все отрисовывается нормально.
Код стопудово не причем.
Когда-то уже видел подобную байду.
Толи карточка глючила, толи дрова уже не помню.
Попробуй на другом ПК.


 

Member
Статус: Не в сети
Регистрация: 11.11.2004
Откуда: Челябинск
Lord_of_Darkness
Lord_of_Darkness писал(а):
Оказалось проще в ини, и уже сделал, так что...

гораздо проще в xml
давно я здесь не был...

_________________
пишу я программу... и вдруг на клавиатуру выползает bug, буквально


 

Member
Статус: Не в сети
Регистрация: 17.04.2005
Никто не подскажет как можно уменьшить размер проги на Delphi? А то написал простенькую прогу, а она аж 400 кб весит(на обычном паскале окло 20-30кб)


 

Member
Статус: Не в сети
Регистрация: 03.01.2004
Откуда: Питер
eldarovich88 Никак. Нет вру, если на WinApi писать то будет 20-40кило, но легче повесится :(
Еще можешь попробовать упаковщики типа UPX

_________________
Здесь так мало тех, с кем легко говорить,
Еще меньше тех, с кем не страшно молчать (c)


 

Member
Статус: Не в сети
Регистрация: 14.01.2004
Откуда: Киев, Украина
eldarovich88 есть альтернативные библиотеки классов для GUI, вроде KOL, и другие наподобии KOL. Только разрабатывать на них сложнее, чем на обычном VCL.

_________________
Ку ку


 

Adminus Overclockerus
Adminus Overclockerus
Статус: Не в сети
Регистрация: 11.10.2002
Откуда: Default
Фото: 0
_SGK
_SGK писал(а):
Тоже попробовал - все отрисовывается нормально. Код стопудово не причем. Когда-то уже видел подобную байду. Толи карточка глючила, толи дрова уже не помню. Попробуй на другом ПК.

Попробовал на машине с Win98. Там всё ок. Бред какой-то.


 

Member
Статус: Не в сети
Регистрация: 05.01.2005
Mech
Mech писал(а):
Попробовал на машине с Win98. Там всё ок. Бред какой-то.

Не бред, а глюк. ;)
Уточнил, у знакомого подобный глюк пропал после переустановки Винды и дров соответственно.
Думаю, что хватит и переустановки дров.


 

Member
Статус: Не в сети
Регистрация: 17.04.2005
А можно ли каким нибудь образом уже скомпилированную прогу(exe-шник) обратно в dpr переделать?


 

Member
Статус: Не в сети
Регистрация: 03.01.2004
Откуда: Питер
eldarovich88 ГЫ! Дизассемблируй и переведи asm->Delphi :) Если это не принимать во внимание то больше никак.

_________________
Здесь так мало тех, с кем легко говорить,
Еще меньше тех, с кем не страшно молчать (c)


 

Adminus Overclockerus
Adminus Overclockerus
Статус: Не в сети
Регистрация: 11.10.2002
Откуда: Default
Фото: 0
_SGK
Что интересно, под VMWare в Win98 всё ок; там же, но в WinXP - так же глючит.

Кстати, а можно ли задисейблить BitBtn так, чтобы картинка на кнопке осталась?

Ну и еще один вопрос.
Хочу, чтобы приложение "прилипало" к правому краю (как многие IM клиенты). Реализую так:
Код:
  protected
    procedure FormMove(var Msg: TMessage); message WM_MOVE;
...
procedure TMainForm.FormMove(var Msg: TMessage);
begin
  If (Screen.WorkAreaWidth-Left-Width <50) then
  Left:=Screen.WorkAreaWidth-Width;

  If (Screen.WorkAreaHeight-Top-Height <0) then
  Top:=Screen.WorkAreaHeight-Height;
end;

Все работает, но при движении окно начинает бешено прыгать из места принудительной установки в место перемещения.
Я так понимаю, надо рубить попытки смены позиции окна, но как это сделать - не знаю.


 

Member
Статус: Не в сети
Регистрация: 05.01.2005
Mech
Mech писал(а):
Кстати, а можно ли задисейблить BitBtn так, чтобы картинка на кнопке осталась?

В исходники не лазил, но, уверен, что фишка в том, что при установке BitBtn1.Enabled в False для отрисовки рисунка нужен один Glyph содержащий и цветной и серый рисунки.
Тогда на автомате при BitBtn1.Enabled = True будет отрисовываться цветной, а при False серый.
Посмотри, как это сделано для предустановленных вариантов (свойство Kind) и склей свои рисунки.
Соответственно в свойстве NumGlyphs нужно указать 2.
Иначе нужно переписать (перекрыть) отрисовку.
Ессно имхо. :)

Mech писал(а):
Все работает, но при движении окно начинает бешено прыгать из места принудительной установки в место перемещения.
Я так понимаю, надо рубить попытки смены позиции окна, но как это сделать - не знаю.

Ессно будет прыгать, ведь твой код реагирует на событие, сколько ты тянешь, столько оно и генерится. ;)
Попробуй так (можешь выставить сразу в Инспекторе объектов).
Код:
procedure TForm1.FormCreate(Sender: TObject);
begin
  Form1.SnapBuffer:= 50;  // Максимальное число пикселов, между гранью формы и гранью экрана
  Form1.ScreenSnap:= True;  // Соответственно цеплять или нет.
end;


 

Member
Статус: Не в сети
Регистрация: 17.10.2003
Откуда: Киев
Есть например такой код:
Код:
for i:=1 to 8000 do
begin
  repeat
   x:=250-random(500);
   y:=250-random(500);
  until random((x*x+y*y+870))=random(abs(y*(x-y)*(x+y)));

  image1.Canvas.Pixels[x+250,y+250]:=clblack;

end;

Поиск координат каждой точки занимает достаточно много времени. Если запустить программу, то она поработает несколько секунд и выдаст результат на Canvas'е. А как сделать так, чтоб можно было наблюдать процесс поиска точек, т.е. чтоб после каждого image1.Canvas.Pixels[x+250,y+250]:=clblack; Canvas на экране обновлялся?


 

Member
Статус: Не в сети
Регистрация: 02.03.2005
Откуда: Владивосток
LS писал(а):
Есть например такой код:
Код:
for i:=1 to 8000 do
begin
  repeat
   x:=250-random(500);
   y:=250-random(500);
  until random((x*x+y*y+870))=random(abs(y*(x-y)*(x+y)));

  image1.Canvas.Pixels[x+250,y+250]:=clblack;

end;

Поиск координат каждой точки занимает достаточно много времени. Если запустить программу, то она поработает несколько секунд и выдаст результат на Canvas'е. А как сделать так, чтоб можно было наблюдать процесс поиска точек, т.е. чтоб после каждого image1.Canvas.Pixels[x+250,y+250]:=clblack; Canvas на экране обновлялся?


Вставь такой код:
Код:
Application.ProcessMessages;


 

Member
Статус: Не в сети
Регистрация: 17.10.2003
Откуда: Киев
Aleksoid1978
:beer:
Спасибо!


 

Member
Статус: Не в сети
Регистрация: 03.01.2004
Откуда: Питер
Народ, а что с помощью TClient(Server)Socket через инет нельзя инфу передавать? Только по локалке? Я вот попробовал, прога вроде подрубается, ошибок не выдает, но инфа до сервака не доходит :(

_________________
Здесь так мало тех, с кем легко говорить,
Еще меньше тех, с кем не страшно молчать (c)


 

Advanced member
Статус: Не в сети
Регистрация: 09.06.2003
Откуда: USSR
Lord_of_Darkness писал(а):
арод, а что с помощью TClient(Server)Socket через инет нельзя инфу передавать? Только по локалке? Я вот попробовал, прога вроде подрубается, ошибок не выдает, но инфа до сервака не доходит

А какая нафиг разница то? :) Инет или локалка? Все должно пахать на ура, главное чтобы скорость была нормальная если ты просто по TCP/IP что-то гнать собрался.


Показать сообщения за:  Поле сортировки  
Начать новую тему Новая тема / Ответить на тему Ответить  Сообщений: 2317 • Страница 46 из 116<  1 ... 43  44  45  46  47  48  49 ... 116  >
-

Часовой пояс: UTC + 3 часа


Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 1


Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете добавлять вложения

Перейти:  
Создано на основе phpBB® Forum Software © phpBB Group
Русская поддержка phpBB | Kolobok smiles © Aiwan