Отправляет email-рассылки с помощью сервиса Sendsay

Клуб программистов

  Все выпуски  

Клуб программистов рассылка. Выпуск 83


redaktor От ведущего.

Здравствуйте, читатели рассылки. Поздравляю всех наших подписчиков и форумчан с праздником - Днём народного единства. Идут долгожданные длинные выходные, надеюсь, вы их проведете так, что вам не будет обидно за бесцельно прожитые дни. Читайте в этом номере обзор интересных тем за неделю.
logo_grey Новые интересные статьи клуба программистов. Статьи на сайте клуба постоянно пополняются. Поэтому это постоянная и основная рубрика рассылки. Так же здесь обзор топиков форума и блога программистов.
 

Седьмой выпуск журнала "ПРОграммист"
Здравствуйте, уважаемые читатели журнала "ПРОграммист" от Клуба ПРОграммистов www.programmersforum.ru. Октябрь подарил нашему проекту и читателям новых авторов. Будем надеяться, постоянных, так как материалы и их опыт, представленные в данном номере, будут полезны не только начинающим программистам, но и профессионалам. Напоминаем вам, что на официальном сайте журнала www.procoder.info продолжается формирование анкет авторов и сам автор, по желанию, может скорректировать информацию о себе. Для этого достаточно обратиться письмом к администратору сайта Василию Мединцеву на электронный ящик info(а)procoder.info. По-прежнему мы рады вашим заметкам, предложениям и статьям, которые вы можете прислать на редакторский ящик-копилку maindatacentr(а)gmail.com. Тема на форуме

Получить список файлов и время создания файла в ListView
Надо, что бы при нажатии на кнопку, происходило сканирование директории в которой лежит экзешник и в соответствующие поля заносилась информация о файле - Название и Дата создания. Тема на форуме

Флешка как ключ
Можно ли это реализовать:
Есть пользовательская версия - запускается только с ограниченными возможностями - например на 10 минут и все.
ПВ находится на компьютере.
Есть мастер-файлы на Флешке. При запихивании флешки в USB с приложения снимаются все ограничения.
Думаю, может у флешки есть какой нибудь номер, как у харда, что бы можно было "привязать" мастер-файлы только к этой флеши.
Или даже ПВ делать просто физически неполной. А недостающие для полной версии файлы запихнуть на флешку. Тема на форуме

Скрытие кнопки программы на панели задач
Для Делфи7 (на VCL) вполне достаточно такого:

procedure TForm1.FormCreate(Sender: TObject);
begin
  SetWindowLong(Application.Handle, GWL_EXSTYLE, WS_EX_TOOLWINDOW);
end;
Тема на форуме

Удаление пустых строк в StringGrid с "поднятием" остальных
Возникла необходимость в удалении пустых строк в StringGrid, но чтобы оставшиеся "поднялись" наверх, т.е. как бы сдвинулись со своих позиций на -1 значение.

procedure TForm1.Button7Click(Sender: TObject);
var
 row: integer;
begin
 for row:=0 to Form1.StringGrid1.RowCount - 1 do
 begin
  if Trim(StringGrid1.Rows[row].Text) = '' then
  THackGrid(StringGrid1).DeleteRow(row);
 end;
 end;

procedure TForm1.Button8Click(Sender: TObject);
var i,j: integer;
begin
for i:=1 to StringGrid1.ColCount-1 do
for j:=0 to StringGrid1.RowCount-1 do
StringGrid1.Cells[i,j]:=IntToStr(i)+IntToStr(j);
end;
Тема на форуме

Как взять значение из последней ячейки StringGrid?
Первую ячейку тут все понятно, а вот как определить самое последнее значение в StringGrid? Количество строк может быть разное, поэтому сколько именно строк будет я не знаю. Вот и надо как-то определить и вытащить значение из самой последней ячейки. Тема на форуме

Поиск и замена файлов в заданных каталогах
Тема на форуме

Изменение цвета поля edit при попадании на него курсора
Есть форма, на ней два поля (Edit1 и Edit2), при нажатии клавиши enter курсор переходит с одного поля на другой по очереди . Нужно чтобы при попадании кусора в edit1 или edit2 эти поля должны изменять цвет. Тема на форуме

Дерево жесткого диска в StringList
Тема на форуме

Как узнать сколько занимает памяти программа?
Тема на форуме

Как запретить принтскрин?
Тема на форуме

Как менять позицию курсора в RichEdit c помощью TrackBar?

procedure TForm1.RichEdit_MoveTo(LineNumber, CharNumber: Word);
begin
  RichEdit1.SelStart := RichEdit1.Perform(EM_LINEINDEX, LineNumber, 0) + CharNumber;
end;

procedure TForm1.TrackBar1Change(Sender: TObject);
begin
  RichEdit_MoveTo(TrackBar1.Position,5);
  Application.ProcessMessages;
  RichEdit1.SetFocus;
end;
Тема на форуме

Проект facemesh.ru
Посмотрев фильм "социальная сеть" один из участников форума решил повторить проект facemesh.ru Тема на форуме

Кто над чем работает?
Доброе утро! Давно я на этом форуме и знаю, что здесь очень много умных людей, программистов-профессионалов. Поэтому интересно. А кто чем занимается в данный момент? Кто над чем работает? Над каким проектом? . Пишите, лично мне будет интересно узнать. Можно просто сказать область в которой работаете над проектом, если рассказывать о нем не хотите. Тема на форуме

На сайте клуба есть рубрики пост-обзор и топик-обзор клуба программистов.
ev Немного юмора.
Юмор с 7 выпуска журнала ПРОграммист:

***
Очередная пятая тема-клон от одного автора на форуме нашего Клуба programmersforum.ru...
cop08: Дан двумерный числовой массив. Найти сумму максимальных элементов в строках
BOBAH13: В принципе, можно еще раз 50 тем создать.

***
Вопрос на собеседовании: Назовите основные принципы ООП?
Ответ: Наследование, полиморфизм и... третий.

***
Админы, скажыте пожалусто есть ли антивирусы на подобе "Dr.web" которые сами производят очистку вирусов нужно делать проверку компьютера потомучто меня уже 3 тию неделю подряд аблезают вирусы и меня отключают, пожалусто ответить мне на вопрос...

***
Рекордная скорость
передачи информации на малые расстояния была достигнута сегодня в офисе одной из компьютерных фирм при падении со стеллажа высотой в один метр коробки, содержавшей 20 накопителей Seagate Barracuda 300 GB. Общий объем переданной на расстояние 1 метра информации составил 300*20*8 = 48 000 гигабит, время передачи составило t=sqrt(2h/g)=0.4 секунды. Таким образом, средняя скорость передачи информации составила 120 терабит/с!

Посетите раздел юмора на форуме, который обновляется постоянно
Читать этот номер в клубе.

В избранное