Всем привет

Тестовый раздел
#12

Ряды пополняются … ))

#13

Всем привет. Я с вами. Очень рад. Спасибо за приглашение

1 лайк
#14

Аватар загружается сразу в страницу без подтверждения кнопкой “Отправить” … Неожиданно …

#15

я не злой, но… желаю алару, чтобы он ни с чем остался. или с кучей неадекватов

#16 
uses jpeg;// Lazarus
     
    procedure TForm1.Button1Click(Sender: TObject);
    var
      jpeg: TJPEGImage;
      bmp: TBitmap;
    begin
      if  PictureDialog1.Execute then
      begin
        jpeg := TJPEGImage.Create;
        bmp := TBitmap.Create;
        try
          jpeg.LoadFromFile(PictureDialog1.FileName);
          bmp.Assign(jpeg);
          ADOTable1.Edit;                  // режим редактирования
          ADOTable1.FieldByName('Foto').Assign(bmp);//загрузка фото
          ADOTable1.Post;                  // сохраняем данные
        finally
          jpeg.Free;
          bmp.Free;
        end;
      end;
    end;
#31

Пост был перенесен в новую тему: Про вред от фильтров мата

#32
1 2 3
2 4 5
8 4 6
#33

22

1010101012

#34

:catshake::catshake:

#36
  • fjrjgfikrjgirjyg
  • jikr gjrgrg r ghr
  1. олуоашлкупокпкпр
  2. алкоаплкулко
  • оал полка пок пок пшк по
  • акпл пкл покл покл пол опеш

kfgkjgkrjgkrjg
jgkrjgrgrpgrgrg
grg
rgh
r
gh
rth
rt
hrt
h

#37

Hi, I’m Desс.

2 лайка
#38

hi :partyparrot:

#39

Hi, Desc

#45
#46
#48

ркапркоркокнокн

#49

frjghjrghgujgth

#50

dddddddddddddxscscsc

#51

ffdffffffffffffff

#52

Вадим, что с тобой?

1 лайк