Войти или зарегистрироваться
Выберите удобный способ — аккаунт создастся автоматически.
Или войдите по логину и паролю
21.09.2009, 13:59
|
|
Новичок
Регистрация: 08.07.2008
Сообщений: 9
С нами:
9390631
Репутация:
0
|
|
мне надо сменить рисунок ... сейчас открыл форму в делфи ... но чего то не пойму как рисунок вставить =)
|
|
|
21.09.2009, 14:17
|
|
Познающий
Регистрация: 15.07.2009
Сообщений: 71
С нами:
8854881
Репутация:
35
|
|
Сообщение от toxa001
мне надо сменить рисунок ... сейчас открыл форму в делфи ... но чего то не пойму как рисунок вставить =)
В контроле TImage есть свойство Picture кликни в этом поле 2 раза появится окно загрузки картинки далее думаю понятно все)
|
|
|
|
21.09.2009, 15:02
|
|
Новичок
Регистрация: 08.07.2008
Сообщений: 9
С нами:
9390631
Репутация:
0
|
|
Всем спасибо =)
|
|
|
|
21.09.2009, 15:42
|
|
Познающий
Регистрация: 18.11.2008
Сообщений: 95
С нами:
9198699
Репутация:
0
|
|
Как можно редактировать элемент TListBox при двойном шелчке
|
|
|
|
21.09.2009, 15:54
|
|
Познающий
Регистрация: 15.07.2009
Сообщений: 71
С нами:
8854881
Репутация:
35
|
|
Есть такой код на С++:
Код:
for (r = 0; r < ClCount; r++, FileSize -= BlockSize)
{
Offset.QuadPart = ClusterSize * Clusters[r];
SetFilePointer(hDrive, Offset.LowPart, &Offset.HighPart, FILE_BEGIN);
ReadFile(hDrive, Buff, ClusterSize, &Bytes, NULL);
BlockSize = FileSize < ClusterSize ? FileSize : ClusterSize;
WriteFile(hFile, Buff, BlockSize, &Bytes, NULL);
}
Как перевести его на Delphi, точнее не сам цикл, а всего лишь вот эту строчку:
Код:
BlockSize = FileSize < ClusterSize ? FileSize : ClusterSize;
подскажите =) |
|
|
|
21.09.2009, 16:25
|
|
Постоянный
Регистрация: 24.03.2009
Сообщений: 670
С нами:
9017461
Репутация:
414
|
|
Как перевести его на Delphi, точнее не сам цикл, а всего лишь вот эту строчку:
Код:
if FileSize < ClusterSize then BlockSize := FileSize
else BlockSize := ClusterSize;
|
|
|
|
21.09.2009, 16:32
|
|
Познающий
Регистрация: 15.07.2009
Сообщений: 71
С нами:
8854881
Репутация:
35
|
|
Сообщение от razb
Код:
if FileSize < ClusterSize then BlockSize := FileSize
else BlockSize := ClusterSize;
Пасиб) razb, я в принципе так и думал, но лучше уточнить, чем гадать так или не так)!
|
|
|
|
25.09.2009, 02:01
|
|
Постоянный
Регистрация: 12.05.2009
Сообщений: 395
С нами:
8947056
Репутация:
229
|
|
Есть символ '
Нужно его программно запихнуть к примеру в Edit1
Как это сделать? (естественно edit1.text:=''' не помогает  ) |
|
|
|
21.09.2009, 19:48
|
|
Познающий
Регистрация: 18.11.2008
Сообщений: 95
С нами:
9198699
Репутация:
0
|
|
Как в ListBox-е вставить строку после определенной строки ?
|
|
|
|
21.09.2009, 19:51
|
|
Познающий
Регистрация: 02.06.2009
Сообщений: 67
С нами:
8916612
Репутация:
54
|
|
ListBox1.Items.Insert(5, 'stroka')
5 - индекс строки
Последний раз редактировалось Nullsleep; 22.09.2009 в 08:59..
|
|
|
|
|
 |
|
Предыдущая тема
Следующая тема
|
Здесь присутствуют: 16 (пользователей: 0 , гостей: 16)
|
|
|
|
Похожие темы
Комбинированный вид
