Rambler's Top100
Форум: MS ACCESSVBVBA MS OfficeMS SQL server
Новые сообщения: 0000

Форум: MS ACCESS

Вопросы связанные с MS ACCESS

Обновить визитку
Участники «Online»
Все участники

 
 

Доброго времени суток, Посетитель!

вид форума:
Линейный форум Структурный форум

тема: Цвет фона
 
 автор: Скорп   (25.09.2008 в 22:58)   личное сообщение
 
 

подскажите, как правильно написать?
так не ругается
Me.Поле0.BackColor = 1234

а так ругается

Me.Поле0.BackColor = #FFFFFF

  Ответить  
 
 автор: Lukas   (25.09.2008 в 23:36)   личное сообщение
 
 

Правильно в верхнем варианте. В хелпе записано - Long.
Подсмотреть десятиричное представления значения цвета в 2007 можно в редакторе VBA, в окне свойств (слева внизу), предварительно выбрав объект в поле со списком в заголовке окна.
А в окне свойств в режиме конструктора оно похоже показывается в шестнадцатиричном представлении. Очередная хохмочка дядюшки Била.

  Ответить  
 
 автор: Скорп   (26.09.2008 в 00:34)   личное сообщение
 
 


Подсмотреть десятиричное представления ...


ага..спасибо
(нафига такие сложности...там одна система счисления, в VBA другая...)

  Ответить  
 
 автор: Lukas   (25.09.2008 в 23:36)   личное сообщение
 
 

Достала блин эта мобильная связь Скай-линк.

  Ответить  
 
 автор: Скорп   (25.09.2008 в 23:40)   личное сообщение
 
 


А в окне свойств в режиме конструктора оно похоже показывается в шестнадцатиричном представлении. Очередная хохмочка дядюшки Била.

ну да...
поэтому и спросил, как шестнадца...(и не выговоришь) в коде написать

ну ладно...нашел таблицу основных цветов в цифрах
http://office.microsoft.com/ru-ru/access/HP051878881049.aspx

  Ответить  
 
 автор: час   (26.09.2008 в 08:13)   личное сообщение
 
 

Можно подобрать цвет на любом элементе(контроле, форме, заголовке формы.......) в "свойствах" этого элемента, а потом скопировать значение.
При подборе там оттенки видны цветов - "яркость" - приятную подобрать - радужность подходящую, а потом цифирки скопировал........ и порядок.

  Ответить  
 
 автор: Скорп   (26.09.2008 в 13:36)   личное сообщение
 
 

так в 2007-м Аксе в свойствах элемента не цифИри стоят, а шестнадцатеричное представление цвета
белый к примеру #FFFFFF

  Ответить  
 
 автор: FORMAT   (26.09.2008 в 14:02)   личное сообщение
 
 

А что в 2007 акс констатнты тип vbRed уже не воспринимет?
Как говорил мне один знакомый, работавший на аксе лет 8, в аксесе все должно быть квадратно или прямоугольно, иначе могут начаться глюки. А игра с цветами - либо не на каждом компе может пойти, либо, если перестараться, привести юзера к базедовой болезни.

ТЯП за первую тяпницу на неделе!!!.

  Ответить  
 
 автор: час   (27.09.2008 в 10:09)   личное сообщение
 
 

Дожили блин....... ну мелкосовтовцы, ну нвкрутили с новым офисом......... одни недоразумения.....
А построителя выражений там наверное и близко нет.
Я имею ввиду старый добрый TsiXpr90.dl
А насчёт #FFFFFF - может функция какая есть - для перевода в dec

вот тут что то попалось
function StrHexToInt(s: string): Integer;
var
i, n, b: Integer;
function Exponentation(num, level: Integer): Integer;
begin
case level of
0: Result := 1;
1: Result := num;
else
Result := num*Exponentation(num, level - 1);
end;
end;
function GetNumByChar(c: char): Integer;
begin
case c of
'0': Result := 0;
'1': Result := 1;
'2': Result := 2;
'3': Result := 3;
'4': Result := 4;
'5': Result := 5;
'6': Result := 6;
'7': Result := 7;
'8': Result := 8;
'9': Result := 9;
'A': Result := 10;
'B': Result := 11;
'C': Result := 12;
'D': Result := 13;
'E': Result := 14;
'F': Result := 15;
else
Result := -1;
end;
end;
begin
s := UpperCase(s);
n := length(s);
if n > 8 then
begin
Result := -1;
Exit;
end;
Result := 0;
for i := n downto 1 do
begin
b := GetNumByChar(s[i]);
if b = -1 then
begin
Result := -1;
Exit;
end;
Result := Result + Exponentation(16, n - i)*b;
end;
end;

но это на С
взято http://www.wasm.ru/forum/viewtopic.php?id=12188

  Ответить  
 
 автор: час   (27.09.2008 в 10:26)   личное сообщение
 
 

или вот:
В следующем примере функция Val возвращает десятичное значение -1 для заданного шестнадцатеричного значения:

Val("&HFFFF")

  Ответить  
 
 автор: час   (27.09.2008 в 14:07)   личное сообщение
 
 

а может имеется в настройках - отображать в десятичном виде

  Ответить  
 
 автор: Скорп   (27.09.2008 в 14:47)   личное сообщение
 
 

искал, не нашел такого пункта

  Ответить  
 
 автор: Скорп   (25.09.2008 в 23:41)   личное сообщение
 
 

хорошо хоть такая
а то я от родителей ч-з МТС тяну бывает инет
вот там полная Ж!!

  Ответить  
 
 автор: час   (26.09.2008 в 08:10)   личное сообщение
 
 

Скай линк обдираловка!!!!!
Как залупи. .. ой как задрали цену блин, так и не снижают.....
Я перешёл на безлимитку в местную телеф-компанию.

  Ответить  
 
 автор: KrukVN   (27.09.2008 в 12:51)   личное сообщение
 
 

Давно юзаю такую приблуду: Colorpoint - не помню уже где взял (бесплатная)
удобная штука. цвет в любом представлении + возможность узнать цвет в любом месте экрана и пр.

  Ответить  
 
 автор: час   (27.09.2008 в 14:06)   личное сообщение
 
 

Да удобно

  Ответить  
HiProg.com - Технологии программирования
Rambler's Top100 TopList