Модераторы: Poseidon, Snowy, bems, MetalFan

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Из байта сделать два полубайта, НИЧЕГО НЕ ПОНИМАЮ!! 
:(
    Опции темы
bems
Дата 30.5.2006, 03:28 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Комодератор
Сообщений: 3400
Регистрация: 5.1.2006

Репутация: 31
Всего: 88



Вот, написал такой код
Код

function FileTimeToStr(ft:FILETIME):string;
var bytes:array[1..16] of byte absolute ft;
    i:integer;
begin
result:='';
for i:=1 to 16 do
 result:=result+char(ord('a')+bytes[i] shr 4)+' '+char(ord('a')+bytes[i] mod 240)+'    ';
end;

procedure TForm1.Timer1Timer(Sender: TObject);
var ft:filetime;
begin
GetSystemTimeAsFileTime(ft);
memo1.Lines.add(FiletimeToStr(ft));
end;

А выводит он сущую фигню. Помогите плиз найти ошибку 


--------------------
Обижено школьников: 8
PM MAIL   Вверх
Coder
Дата 30.5.2006, 03:51 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 733
Регистрация: 13.12.2004

Репутация: 5
Всего: 11



Я не разбирался с твоим кодом но САБЖ можно сделать так:
b - байт
Код

asm
  mov al, b
  and al, 00001111b  // выделяем младшие 4 бита
  mov ah, b
  and ah, 11110000b // выделяем старшие 4 бита
  shr ah, 4
end


в результате в al - младшие 4 байта, в ah - старшие
 
можно и без ассемблера обойтись:
Код

var
  b : byte;
  lo_, hi_ : byte;
begin
  b:=173;

  lo_:=b and $f;
  hi_:=b and $f0;
  hi_:=hi_ shr 4;
end
  

Это сообщение отредактировал(а) Coder - 30.5.2006, 04:06
PM MAIL   Вверх
Snowy
Дата 30.5.2006, 08:07 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 192
Всего: 484



Цитата
Из байта сделать два полубайта
Код

var
  bh, bl, b: byte;
begin
  b := xx; // чему-то равно
  bh := b shr 4 shl 4; // или просто shr, если нужно переместить верхние 4 в нижнюю часть
  bl := b shl 4 shr 4;
end;
  
PM MAIL   Вверх
Coder
Дата 30.5.2006, 08:57 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 733
Регистрация: 13.12.2004

Репутация: 5
Всего: 11



Snowy, че-то ты намудрил.
надо так:
Код

bh := b shr 4;
bl := b shl 4;
bl:=bl shr 4;


если во втором случае сразу применить shl и shr то ВСЕ биты вернуться на свои места и при этом старшие не обратятся в нули 
PM MAIL   Вверх
Демо
Дата 30.5.2006, 09:05 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1278
Регистрация: 3.11.2005

Репутация: 30
Всего: 50



Код

var    
  bh, bl, b: byte;    
begin    
  b := xx;
  bh := (b and $F0) shr 4;
  bl := b and $0F;    
end;
 


--------------------
    
PM MAIL ICQ Skype   Вверх
Snowy
Дата 30.5.2006, 09:08 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 192
Всего: 484



Угу. Заметил - при выполнении операций, байт превращается в 4, потому и не получается.
Но лечится легко:
Код

var    
  bh, bl, b: byte;    
begin    
  b := xx; // чему-то равно    
  bh := b shr 4 shl 4; // или просто shr, если нужно переместить верхние 4 в нижнюю часть
  bl := byte(b shl 4) shr 4;
end;
 
PM MAIL   Вверх
Coder
Дата 30.5.2006, 09:10 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 733
Регистрация: 13.12.2004

Репутация: 5
Всего: 11



Демо, не пому чем твой пример отличается от моего в первом ответе? в одну строку операторы and и shr не объединил что ли? smile 
PM MAIL   Вверх
Демо
Дата 30.5.2006, 09:12 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1278
Регистрация: 3.11.2005

Репутация: 30
Всего: 50



Цитата(Coder @  30.5.2006,  09:10 Найти цитируемый пост)
Демо, не пому чем твой пример отличается от моего в первом ответе? в одну строку операторы and и shr не объединил что ли?


Отличается именно этим.
Пока досмотрел, про твой код и забыл.
Тебя что, задевает? 


--------------------
    
PM MAIL ICQ Skype   Вверх
Snowy
Дата 30.5.2006, 09:27 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 192
Всего: 484



Тогда так будет самый оптимальный способ:
Код

  bh := b shr 4;
  bl := b and $F;
 
PM MAIL   Вверх
Mechanic
Дата 30.5.2006, 09:42 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 228
Регистрация: 5.5.2006
Где: Kharkov, Ukraine

Репутация: 6
Всего: 7



Цитата(Coder @  30.5.2006,  08:57 Найти цитируемый пост)
bh := b shr 4;

Только не нужно это делать литералами прямо в коде!
Просто Delphi имеет глупую привычку заменять иногда при вычислении литералов shr на sar. 
--------------------
Tell me the extensions of the files You backup and I'll tell You who You are..  ©Mch  
PM   Вверх
Rennigth
Дата 30.5.2006, 10:21 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Участник Клуба
Сообщений: 1708
Регистрация: 21.6.2004
Где: Moscow

Репутация: 49
Всего: 76



Цитата(Mechanic @  30.5.2006,  09:42 Найти цитируемый пост)
Просто Delphi имеет глупую привычку заменять иногда при вычислении литералов shr на sar.  

негде сейчас посмотреть, sar это что?
 


--------------------
(* Honesta mors turpi vita potior *)
PM MAIL ICQ   Вверх
bems
Дата 30.5.2006, 10:21 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Комодератор
Сообщений: 3400
Регистрация: 5.1.2006

Репутация: 31
Всего: 88



Спасибо, ребята, но это все и так понятно.
вот в этой моей строчке примерно то же самое и делаю
char('a'+bytes[i] shr 4)+' '+char('a'+bytes[i] mod 240)
но второй символ выходит за пределы латинского алфавита, а значить что bytes[i] mod 240 больше 16, чего быть не может. Может с этим absolute чего не так? или я уже не знаю...

Взгляните плиз на мой код, там не так уж много...

Цитата(Mechanic @  30.5.2006,  09:42 Найти цитируемый пост)
Просто Delphi имеет глупую привычку заменять иногда при вычислении литералов shr на sar
C этого моменто поподробнее

Добавлено @ 10:25 
Цитата(Coder @  30.5.2006,  08:57 Найти цитируемый пост)
если во втором случае сразу применить shl и shr то ВСЕ биты вернуться на свои места и при этом старшие не обратятся в нули  
Вот это тоже не ясно... Можно теоретические основы?
 


--------------------
Обижено школьников: 8
PM MAIL   Вверх
Snowy
Дата 30.5.2006, 10:43 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 192
Всего: 484



Цитата(bems @  30.5.2006,  03:28 Найти цитируемый пост)
function FileTimeToStr(ft:FILETIME):string;    
var bytes:array[1..16] of byte absolute ft;
Зачем тебе байты? string и так массив.
Кроме того по данной схеме, как я понимаю, получается, что bytes у тебя ссылается на указатель на строку, а не на саму строку. 
PM MAIL   Вверх
ShadeSt
Дата 30.5.2006, 13:42 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 256
Регистрация: 9.8.2005
Где: Россия, г. Ставро поль

Репутация: нет
Всего: 7



Может я чего то не понимаю, но

Код

The FILETIME structure is a 64-bit value representing the number of 100-nanosecond intervals since January 1, 1601. 

typedef struct _FILETIME { // ft  
    DWORD dwLowDateTime; 
    DWORD dwHighDateTime; 
} FILETIME; 

64 бита, это вроде всего 8мь байт (получается, что последние 8мь байт в массиве - "неопределены"??).

а вот еще:
Код

The GetSystemTimeAsFileTime function is equivalent to the following code sequence:

FILETIME ft;
SYSTEMTIME st;
 
GetSystemTime(&st);
SystemTimeToFileTime(&st,&ft);


а с SYSTEMTIME все должно быть просто:
Код

typedef struct _SYSTEMTIME {  // st  
    WORD wYear; 
    WORD wMonth; 
    WORD wDayOfWeek; 
    WORD wDay; 
    WORD wHour; 
    WORD wMinute; 
    WORD wSecond; 
    WORD wMilliseconds; 
} SYSTEMTIME; 

Это по поводу того, как можно получить время, потом с помощью Format привести к нужному виду и потом добавить в memo. Может так проще будет, или инересен сам алгоритм получения строки из FileTime?

По поводу того, что выводит функция:
Код

result:='';    
for i:=1 to 16 do    
 result:=result+char(ord('a')+bytes[i] shr 4)+' '+char(ord('a')+bytes[i] mod 240)+'    ';

тут два символа и пять пробелов ( во втором случае их четыре), итого получится строка из 7*16=112 символов.
что делает этот код для меня, честно говоря загадка.

а как получить тетрады из байта, вроде уже написали.
 


--------------------
It's nice to be importand, but it's more importand to be nice © Scooter
PM MAIL ICQ Jabber   Вверх
Yanis
Дата 30.5.2006, 13:47 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Участник Клуба
Сообщений: 2937
Регистрация: 9.2.2004
Где: Москва

Репутация: 72
Всего: 111



Цитата(ShadeSt @  30.5.2006,  14:42 Найти цитируемый пост)
64 бита, это вроде всего 8мь байт (получается, что последние 8мь байт в массиве - "неопределены"??).

SizeOf(DWORD)+SizeOf(DWORD) = 8
8 * 8 = 64
Какие последние 8 байт? (Я что то недопонимаю? smile)  

Это сообщение отредактировал(а) Yanis - 30.5.2006, 13:51


--------------------
user posted image *щёлк*
PM MAIL WWW ICQ   Вверх
bems
Дата 30.5.2006, 14:11 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Комодератор
Сообщений: 3400
Регистрация: 5.1.2006

Репутация: 31
Всего: 88



Цитата(Snowy @  30.5.2006,  10:43 Найти цитируемый пост)
Зачем тебе байты? string и так массив.

Нужны байты FILETIME
Цитата(ShadeSt @  30.5.2006,  13:42 Найти цитируемый пост)
64 бита, это вроде всего 8мь байт (получается, что последние 8мь байт в массиве - "неопределены"??).
Так просчитаться - это задница. Но ничего не поделаешь, все уже это видели. smile Конечно же я имел ввиду 8. Но в результате этой ошибки суть проблемы не меняется.

Цитата(ShadeSt @  30.5.2006,  13:42 Найти цитируемый пост)
можно получить время, потом с помощью Format привести к нужному виду и потом добавить в memo. Может так проще будет, или инересен сам алгоритм получения строки из FileTime?
Именно так.

Цитата(ShadeSt @  30.5.2006,  13:42 Найти цитируемый пост)
что делает этот код для меня, честно говоря загадка.

попытаюсь прояснить.
Код

function FileTimeToStr(ft:FILETIME):string;//ради отладки этой функции и нужен остальной код
var bytes:array[1..8] of byte absolute ft;//исправляем на 8. спасибо
    i:integer;
begin
result:='';
for i:=1 to 8 do
 result:=result+char(ord('a')+
  bytes[i] shr 4 //старшие 4 бита получаю нормально. Добавляю это значение к началу алфавита
//и получаю символ, не выходящий за пределы алфавита. Так и должно быть
  )+' '+char(ord('a')+
  bytes[i] mod 240//тут пытаюсь получить младшие 4 бита. Когда добавляю это значение
//к началу алфавита, то почему-то получаю не алфавитные символы или русаские буквы.
//в этом и проблема
  )+'    ';
end;

Цитата(ShadeSt @  30.5.2006,  13:42 Найти цитируемый пост)
тут два символа и пять пробелов ( во втором случае их четыре), итого получится строка из 7*16=112 символов.
пробелы для наглядности.
цель получить строку латинских букв
 


--------------------
Обижено школьников: 8
PM MAIL   Вверх
ShadeSt
Дата 30.5.2006, 14:30 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 256
Регистрация: 9.8.2005
Где: Россия, г. Ставро поль

Репутация: нет
Всего: 7



Цитата

Какие последние 8 байт? (Я что то недопонимаю? )  


Код

function FileTimeToStr(ft:FILETIME):string;    
var bytes:array[1..16] of byte absolute ft;

восемь байт с 9го по 16й.  

Это сообщение отредактировал(а) ShadeSt - 30.5.2006, 14:31


--------------------
It's nice to be importand, but it's more importand to be nice © Scooter
PM MAIL ICQ Jabber   Вверх
Yanis
Дата 30.5.2006, 14:38 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Участник Клуба
Сообщений: 2937
Регистрация: 9.2.2004
Где: Москва

Репутация: 72
Всего: 111



Цитата(ShadeSt @  30.5.2006,  15:30 Найти цитируемый пост)
восемь байт с 9го по 16й.  

А ты про это! Понял smile 


--------------------
user posted image *щёлк*
PM MAIL WWW ICQ   Вверх
ShadeSt
Дата 30.5.2006, 14:50 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 256
Регистрация: 9.8.2005
Где: Россия, г. Ставро поль

Репутация: нет
Всего: 7



Дело в том, что ошибка в этой строке:
Цитата(bems @  30.5.2006,  14:11 Найти цитируемый пост)
 bytes[i] mod 240//тут пытаюсь получить младшие 4 бита. Когда добавляю это значение

например: 50 Mod 240 = 50, т.к. остаток от деления равен пятидесяти, попробуй написать так, как советовали выше, например так:
Код

begin
result:='';
  for i := 1 to 8 do
    Result := Result + chr(ord('a') + (bytes[i] shr 4  )) + ' ' +
                       chr(ord('a') + (bytes[i] and $0F)) + '    ';
end;

 


--------------------
It's nice to be importand, but it's more importand to be nice © Scooter
PM MAIL ICQ Jabber   Вверх
bems
Дата 30.5.2006, 15:02 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Комодератор
Сообщений: 3400
Регистрация: 5.1.2006

Репутация: 31
Всего: 88



Mod 240 - это вариант, когда я уже отчаился. Тут еще раз прогнал, это понятно. Как советовали выше (and $0F), сделал и заработало, спасибо.

Волнует вот что. До этого было ((bytes[i] shl 4  ) shr 4) и не работало, хотя по логике вещей должно, и выше писали то же самое. Кто-нить может это объяснить? 


--------------------
Обижено школьников: 8
PM MAIL   Вверх
ShadeSt
Дата 30.5.2006, 17:20 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 256
Регистрация: 9.8.2005
Где: Россия, г. Ставро поль

Репутация: нет
Всего: 7



ИМХО при выполнении 
Код

  (bytes[i] shl 4) shr 4

дельфи, по всей видимости приводит результат операции (bytes[i] shl 4)
к типу Integer, и поэтому получается , что результат не меняется.
можно делать так:
Код

  byte(bytes[i] shl 4) shr 4

для явного приведения типа, либо так:
Код

  (bytes[i] shl 28) shr 28

для того, что бы вылезти за границу Integer'а


 


--------------------
It's nice to be importand, but it's more importand to be nice © Scooter
PM MAIL ICQ Jabber   Вверх
ShadeSt
Дата 30.5.2006, 17:55 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 256
Регистрация: 9.8.2005
Где: Россия, г. Ставро поль

Репутация: нет
Всего: 7



Вот. я нашел, я просто разул глаза и посмотрел справку:
Код

Operator    Operation    Operand types    Result type    Examples
shl    bitwise shift left    integer    integer    X shl 2
shr    bitwise shift right    integer    integer    Y shr I

т.е. тут операнды сразу приводятся к типу Integer, поэтому такое, на первый взгляд странное поведение.  


--------------------
It's nice to be importand, but it's more importand to be nice © Scooter
PM MAIL ICQ Jabber   Вверх
bems
Дата 30.5.2006, 18:40 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Комодератор
Сообщений: 3400
Регистрация: 5.1.2006

Репутация: 31
Всего: 88



спасибочки 


--------------------
Обижено школьников: 8
PM MAIL   Вверх
Guedda
Дата 31.5.2006, 10:11 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Подрывник
****


Профиль
Группа: Завсегдатай
Сообщений: 3137
Регистрация: 27.12.2005
Где: Ростов-на-Дону

Репутация: 14
Всего: 78



А если сделать просто:
Код

var
  bh, bl : Byte;
begin
  asm
    mov  byte ptr bh, ah
    mov  byte ptr bl, al
  end;
end;

Как я понимаю в ah хранятся старшие 4 бита, а в al - младшие. Просто их кинуть в переменные, да и всё тут )
Если не правильно, поясните. 


--------------------
Ll 2
PM MAIL WWW ICQ Skype GTalk   Вверх
Yanis
Дата 31.5.2006, 10:25 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Участник Клуба
Сообщений: 2937
Регистрация: 9.2.2004
Где: Москва

Репутация: 72
Всего: 111



Guedda
Нужно получить именно эти bh и bl, на сколько я понимаю smile 


--------------------
user posted image *щёлк*
PM MAIL WWW ICQ   Вверх
Mechanic
Дата 31.5.2006, 11:06 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 228
Регистрация: 5.5.2006
Где: Kharkov, Ukraine

Репутация: 6
Всего: 7



Цитата(Rennigth @  30.5.2006,  10:21 Найти цитируемый пост)
негде сейчас посмотреть, sar это что?


Цитата(bems @  30.5.2006,  10:21 Найти цитируемый пост)
C этого моменто поподробнее


sar - почти тот же shr, только с сохранением старшего бита (арифметический сдвиг), для корректной работы с отрицательными значениями.
Так вот, если написать
Код

//a: integer;
a := -7 shr 1;
Что должно получиться?  smile Ни за что не угадаете..
 
--------------------
Tell me the extensions of the files You backup and I'll tell You who You are..  ©Mch  
PM   Вверх
Guedda
Дата 31.5.2006, 16:20 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Подрывник
****


Профиль
Группа: Завсегдатай
Сообщений: 3137
Регистрация: 27.12.2005
Где: Ростов-на-Дону

Репутация: 14
Всего: 78



Цитата(Mechanic @  31.5.2006,  12:06 Найти цитируемый пост)
Что должно получиться?  smile Ни за что не угадаете..

Получится 3. 


--------------------
Ll 2
PM MAIL WWW ICQ Skype GTalk   Вверх
Yanis
Дата 31.5.2006, 16:54 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Участник Клуба
Сообщений: 2937
Регистрация: 9.2.2004
Где: Москва

Репутация: 72
Всего: 111



Нека, -4 smile  

Это сообщение отредактировал(а) Yanis - 31.5.2006, 16:56


--------------------
user posted image *щёлк*
PM MAIL WWW ICQ   Вверх
Mechanic
Дата 31.5.2006, 23:33 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 228
Регистрация: 5.5.2006
Где: Kharkov, Ukraine

Репутация: 6
Всего: 7



Точно, -4.. smile

    11111111111111111111111111111001 = -7

По идее, должно быть
    01111111111111111111111111111100 = 2147483644

но имеем
    11111111111111111111111111111100 = -4

Но если сделаем
Код

a := -7;
a := a shr 1;

Тогда все считается кардинально наоборот!  smile  
--------------------
Tell me the extensions of the files You backup and I'll tell You who You are..  ©Mch  
PM   Вверх
Yanis
Дата 1.6.2006, 11:25 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Участник Клуба
Сообщений: 2937
Регистрация: 9.2.2004
Где: Москва

Репутация: 72
Всего: 111



Цитата(Mechanic @  1.6.2006,  00:33 Найти цитируемый пост)
Тогда все считается кардинально наоборот!

Да. Странно, что в первом случае считается некорректно.
Код
Shifts the destination right by "count" bits with zeroes shifted in on the left.  The Carry Flag contains the last bit shifted out.

smile  

Это сообщение отредактировал(а) Yanis - 1.6.2006, 11:26


--------------------
user posted image *щёлк*
PM MAIL WWW ICQ   Вверх
Mechanic
Дата 1.6.2006, 22:00 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 228
Регистрация: 5.5.2006
Где: Kharkov, Ukraine

Репутация: 6
Всего: 7



smile 
--------------------
Tell me the extensions of the files You backup and I'll tell You who You are..  ©Mch  
PM   Вверх
Страницы: (3) [Все] 1 2 3 
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Общие вопросы"
SnowyMetalFan
bemsPoseidon
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Общие вопросы | Следующая тема »


 




[ Время генерации скрипта: 0.1141 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.