Сохраненки

Программирование, Хакинг, Безопасность, Софт, Железо, а также всё связанное с компьютерами
Аватара пользователя
Андрей
Архитектор
Сообщения: 5331
Зарегистрирован: 06 май 2015, 14:10
Откуда: Чехов
Благодарил (а): 471 раз
Поблагодарили: 370 раз

Re: Сохраненки

Сообщение Андрей » 10 июн 2020, 13:05

MessageDlg закрывать через х секунд:
http://www.freepascal.ru/forum/viewtopi ... =5&t=11208
Я спокоен, я возвышаюсь над землёю,
Притягиваю взгляды, знаю, Бог всегда со мною,
Не скрою - планов наперёд не строю,
О том, что было раньше, шепчут годы за спиною.

Аватара пользователя
Андрей
Архитектор
Сообщения: 5331
Зарегистрирован: 06 май 2015, 14:10
Откуда: Чехов
Благодарил (а): 471 раз
Поблагодарили: 370 раз

Re: Сохраненки

Сообщение Андрей » 26 июн 2020, 12:36

https://www.programmersforum.ru/showthread.php?t=5160

Код: Выделить всё

procedure TForm1.ListBox1DrawItem(Control: TWinControl; Index: Integer; Rect: TRect; State: TOwnerDrawState);
var List:TListBox;
begin
    List:=Control as TListBox;
    with List.Canvas, Rect do
        begin
	    if odSelected in State then
	    begin
	        Brush.Color:=clClickedColor;
	        Font.Color:=clHighlightText;
	    end
	    else
	    begin
	        Brush.Color:=clWindow;
	        Font.Color:=clWindowText;
	    end;

	    FillRect(Rect);
               if odFocused in State then Windows.DrawFocusRect(List.Canvas.Handle, Rect);
               TextOut(Left + 1, Top + 1, List.Items[Index]);
        end;  
end;
http://www.freepascal.ru/forum/viewtopic.php?f=5&t=6232

http://delphimaster.net/view/1-13616

https://forum.sources.ru/index.php?showtopic=177452

https://www.sql.ru/forum/128185/kak-pre ... -v-integer
Я спокоен, я возвышаюсь над землёю,
Притягиваю взгляды, знаю, Бог всегда со мною,
Не скрою - планов наперёд не строю,
О том, что было раньше, шепчут годы за спиною.

Аватара пользователя
Андрей
Архитектор
Сообщения: 5331
Зарегистрирован: 06 май 2015, 14:10
Откуда: Чехов
Благодарил (а): 471 раз
Поблагодарили: 370 раз

Re: Сохраненки

Сообщение Андрей » 28 июн 2020, 13:31

Как запускать приложение свёрнутым:
http://delphimaster.net/view/1-1096440862
Я спокоен, я возвышаюсь над землёю,
Притягиваю взгляды, знаю, Бог всегда со мною,
Не скрою - планов наперёд не строю,
О том, что было раньше, шепчут годы за спиною.

Аватара пользователя
Андрей
Архитектор
Сообщения: 5331
Зарегистрирован: 06 май 2015, 14:10
Откуда: Чехов
Благодарил (а): 471 раз
Поблагодарили: 370 раз

Re: Сохраненки

Сообщение Андрей » 04 июл 2020, 14:52

Я спокоен, я возвышаюсь над землёю,
Притягиваю взгляды, знаю, Бог всегда со мною,
Не скрою - планов наперёд не строю,
О том, что было раньше, шепчут годы за спиною.

Аватара пользователя
Андрей
Архитектор
Сообщения: 5331
Зарегистрирован: 06 май 2015, 14:10
Откуда: Чехов
Благодарил (а): 471 раз
Поблагодарили: 370 раз

Re: Сохраненки

Сообщение Андрей » 31 авг 2020, 10:02

Я спокоен, я возвышаюсь над землёю,
Притягиваю взгляды, знаю, Бог всегда со мною,
Не скрою - планов наперёд не строю,
О том, что было раньше, шепчут годы за спиною.

Аватара пользователя
Андрей
Архитектор
Сообщения: 5331
Зарегистрирован: 06 май 2015, 14:10
Откуда: Чехов
Благодарил (а): 471 раз
Поблагодарили: 370 раз

Re: Сохраненки

Сообщение Андрей » 14 сен 2020, 10:08

Я спокоен, я возвышаюсь над землёю,
Притягиваю взгляды, знаю, Бог всегда со мною,
Не скрою - планов наперёд не строю,
О том, что было раньше, шепчут годы за спиною.

Аватара пользователя
Андрей
Архитектор
Сообщения: 5331
Зарегистрирован: 06 май 2015, 14:10
Откуда: Чехов
Благодарил (а): 471 раз
Поблагодарили: 370 раз

Re: Сохраненки

Сообщение Андрей » 23 сен 2020, 18:00

Я спокоен, я возвышаюсь над землёю,
Притягиваю взгляды, знаю, Бог всегда со мною,
Не скрою - планов наперёд не строю,
О том, что было раньше, шепчут годы за спиною.

Аватара пользователя
Андрей
Архитектор
Сообщения: 5331
Зарегистрирован: 06 май 2015, 14:10
Откуда: Чехов
Благодарил (а): 471 раз
Поблагодарили: 370 раз

Re: Сохраненки

Сообщение Андрей » 24 сен 2020, 09:22

R7-Office:
https://zen.yandex.ru/media/id/5c7acf0a ... 00ad1388e9
https://vc.ru/services/151331-kak-ya-po ... poluchilos

«Р7-Офис» может работать на базе ОС Windows и Linux, а также на отечественных ОС. Этот офис создан на базе технологии HTML 5, поэтому все форматы документов Microsoft являются для него нативными: при открытии не требуется их переконвертация, документы открываются сразу в том формате, в котором они есть. За счет этого при работе с документами Microsoft в нем не съезжают шрифты, таблицы и др., что наблюдается в некоторых других офисных пакетах, говорит представитель дистрибьютора данного ПО - группы компаний «Лад».
Я спокоен, я возвышаюсь над землёю,
Притягиваю взгляды, знаю, Бог всегда со мною,
Не скрою - планов наперёд не строю,
О том, что было раньше, шепчут годы за спиною.

Аватара пользователя
Андрей
Архитектор
Сообщения: 5331
Зарегистрирован: 06 май 2015, 14:10
Откуда: Чехов
Благодарил (а): 471 раз
Поблагодарили: 370 раз

Re: Сохраненки

Сообщение Андрей » 13 окт 2020, 14:36

Только для карт NVidia. Неисправные чипы определяются с помощью утилит из под Linux. Утилита называется MODS (MATS)
Образ качал по этой ссылке - https://yadi.sk/d/hu0_AoW04DyIPQ
Я спокоен, я возвышаюсь над землёю,
Притягиваю взгляды, знаю, Бог всегда со мною,
Не скрою - планов наперёд не строю,
О том, что было раньше, шепчут годы за спиною.

Аватара пользователя
Андрей
Архитектор
Сообщения: 5331
Зарегистрирован: 06 май 2015, 14:10
Откуда: Чехов
Благодарил (а): 471 раз
Поблагодарили: 370 раз

Re: Сохраненки

Сообщение Андрей » 19 окт 2020, 21:47

Размеры видеокарты 3080 Founders Edition: 285 x 112 x 2 слота

GeForce RTX™ 2080 Ti GamingPro OC: 292 x 112 x 58 mm

GeForce RTX™ 3080 GamingPro: 294 x 112 x 60 mm

GeForce RTX™ 3080 GamingPro OC: 294 x 112 x 60 mm
Я спокоен, я возвышаюсь над землёю,
Притягиваю взгляды, знаю, Бог всегда со мною,
Не скрою - планов наперёд не строю,
О том, что было раньше, шепчут годы за спиною.