Вернуться   CoderX :: Forums > Lineage II > L2PacketHack > Скриптинг
Войти через OpenID

Скриптинг Форум посвещенный созданию скриптов для L2PacketHack

Чат (Новых сообщений с момента вашего последнего визита нет)
Загрузка...
Задавайте ваши вопросы на форуме. Чат предназначен для небольших разговоров.
 
Ответ
 
Опции темы Опции просмотра
Старый 31.12.2007, 00:56   #1
Пользователь
 
Аватар для skymanrus
 
Регистрация: 28.12.2007
Сообщений: 54
Сказал Спасибо: 0
Имеет 40 спасибок в 10 сообщенях
skymanrus пока неопределено
Смех вопрос о модуле Graphics!!!

вопрос следующий:
я написал скрипт бота который бегает в кружке и мочит всех мобов в этом круге и подберает дроп при этом не бегает за обычными нпц типа гуардов и не цепляется к игрокам

вот хочется ещё видеть всех мобов которые добавленны в базу данных чтоб они отображались наглядно в форме
по типу старого доброго волкера

не подскажете как создать форму и нарисовать в ней точку или загрузить в форму картинку??

как создать я понял
f := TForm.Create(nil);
f.Caption := 'Test it!';
f.BorderStyle := bsDialog;
f.Position := poScreenCenter;

я чесно пытался там мудрить как то но у меня то ошибку выдаёт то вообще ничего не происходит :(
как Из модуля Graphics чет вытащить и нарисовать с помощью координат точку в форме или картинку туда грузануть?
подскажите плиз!

Добавлено спустя 8 часов 27 минут 21 секунду:
люди ну подскажите плиз !!
я весь инет облазил в поисках примеров
ничего нету!

в документации написанно только

Из модуля Graphics:

TFont
TPen
TBrush
TCanvas
procedure TCanvas.Draw(X, Y: Integer; Graphic: TGraphic)
procedure TCanvas.Ellipse(X1, Y1, X2, Y2: Integer)
procedure TCanvas.LineTo(X, Y: Integer)
procedure TCanvas.MoveTo(X, Y: Integer)
procedure TCanvas.Rectangle(X1, Y1, X2, Y2: Integer)
procedure TCanvas.RoundRect(X1, Y1, X2, Y2, X3, Y3: Integer)
procedure TCanvas.StretchDraw(X1, Y1, X2, Y2: Integer; Graphic: TGraphic)
function TCanvas.TextHeight(const Text: string): Integer
procedure TCanvas.TextOut(X, Y: Integer; const Text: string)
function TCanvas.TextWidth(const Text: string): Integer
property TCanvas.Pixels

TGraphic
procedure TGraphic.LoadFromFile(const Filename: string)
procedure TGraphic.SaveToFile(const Filename: string)
property TGraphic.Height
property TGraphic.Width

TMetafile
TMetafileCanvas
TBitmap
property TBitmap.Canvas

type TFontStyles
type TFontPitch
type TPenStyle
type TPenMode
type TBrushStyle

и НИ ОДНОГО ПРИМЕРА ИСПОЛЬЗОВАНИЯ ЭТОГО МОДУЛЯ НЕТУ !!!
ну покажите хоть 1 примерчик !!! как квадратик размеравми 2 на 2 пикселя в форме нарисовать по координатам и все мне, этого будет по горло хватать :)
__________________
На людей сердишся, когда чувсивуешь, что их поступки важны. Ничего подобного я больше не чувствую...
skymanrus вне форума   Ответить с цитированием
Ответ

  CoderX :: Forums > Lineage II > L2PacketHack > Скриптинг



Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.


Часовой пояс GMT +4, время: 03:11.

vBulletin style designed by MSC Team.
Powered by vBulletin® Version 3.6.11
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd. Перевод: zCarot
Locations of visitors to this page
Rambler's Top100

Вы хотите чувствовать себя в безопасности? чоп Белган обеспечит её!