Как запомнить значение выбранного значения (переприсвоить селект)? Дело в том, что у меня эта выборка обходится без БД, просто на странице висит. И что сравнивать, не понимаю. (читать всё…)

Marsel737

Подскажитe пожалуйста каким образом через TComponent можно обращаться, например, к ко всем лэйблам лежащим на панели?

(читать всё…)

skrudjmagdak

Как написать функцию(любую) в delphi, но написанную на assembler’е(т.е. асм код встроенный в delphi), которую потом нужно вызвать.

(читать всё…)

(читать всё…)

Как в Edit запретить вводить более одной точки? (читать всё…)

Alex Cones

Есть ли в дельфи диалог ввода строки?
Чтоб там был лейбл, эдит и кнопка «ОК»

(читать всё…)

У меня возникла проблемка при создании сайта. Есть бд с фильмами. Возникла такая проблеиъма что нужно выводить фильмы по нескольким жанрам На данный момент при ножатии Боевики выводятся все фильмы в поле cat стоит 1 но фильм может относиться к нескольким жанрам Не знаю как реализовать. (читать всё…)

(читать всё…)

Как удалить одинаковые строки из динамического массива в StringList?

Stilet

procedure TForm1.N3Click(Sender: TObject);

var

  isa:integer;

begin

// Создаем временную анонимную переменку

with TStringList.Create do

 begin

// Устанавливаем для нее сортировку и игнор при попытке добавить элемент, который уже есть

  Sorted := true;

  Duplicates := dupIgnore;

//Добавляем весь текст. При этом должна (не уверен) происходить проверка каждого на задвоенность.

  Text := sl.Text;

//Возвращаем назад но уже без дубликатов

  sl.Text := Text;

//Убираем анонимную переменную.

  free;

 end;

 listbox1.Clear;

 for isa:=0 to sl.Count-1 do

 listbox1.Items.insert(isa,extractfilename(sl.Strings[isa]));

 showmessage('Повторяющиеся треки были успешно удалены!');

end;

Пост написан при поддержке РостБанк.

Выгодные вклады в надежном банке по высоким процентам.

тема на форуме

Возникла необходимости отправлять большие запросы типа UPDATE tablename SET photo1=»содержание_фото» WHERE id=»5″. При выполнении такого запроса выскакивает ошибка: «Got a packet bigger than ‘max_allowed_packet’ bytes». Как решить проблему? (читать всё…)