FreePascal.ru

Добрый вечер ! Подскажите есть ли возможность работать с wifi средствами Lazarus?

как программно вытянуть определенную картинку ???

Кто подскажет как использовать zenGl в своих проектах ?

Возникла проблема... в программе динамически создаю экземпляр TSynEdit mySEdit := TSynEdit.Create(Nil);
with mySEdit do begin
Parent := myTabSheet;
Align := alClient;
PopupMenu := PopupMenuText;
end;
проблема: созданный компонент какой то "недоделанный" т.е. в нем не работают ...

А как вытащить яркость контраст оттенок ??

Добавлено спустя 2 минуты 44 секунды:
procedure TForm1.ColorButton1ColorChanged(Sender: TObject);
var r, g, b: Byte;
begin
r := ColorButton1.ButtonColor;
g := ColorButton1.ButtonColor shr 8;
b := ColorButton1&#46 ...

Blue(ColorToRGB(color))
Green(ColorToRGB(color))
Red(ColorToRGB(color))
что мне с этим делать )

Добавлено спустя 6 минут 18 секунд:
если проверять цвет у любого компонента .Font.Color работает верно а если проверить ColorButton1.Color всегда показывает 240 у всех (RGB) может я что то не так ...

не не совсем то нужно так выбрал с помощью ColorButton цвет а в где то в memo заносятся его RGB яркость и т.п. считанных вон от туда

есть всем известный компонент ColorButton с помощью которого можно задать цвет... ну так вот там выходит окно с палитрой цветов Определить цвет>> и там есть поля где указываются числовые значения цвета мне нужно их получить для каждого цвета, желательно оттенок контраст и яркость тоже

Когда планируется следующая версия lazarus

ех хотелось бы описание подробное как все это добро работает

благодарю все работает правда движение рывками

В delphi перемещение кнопки или любого другого компонента производиться с помощью
Panel1.Perform(WM_SysCommand, $F012, 0);
пытаюсь повторить тоже самое в lazarus но элементы стоят как вкопанные при компиляции все норм. что не так ?
ниже приведен код на delphi все работает на lazarus нет
OS ...