Вверх ↑
Этот топик читают: Гость
Ответов: 72
Рейтинг: 0
#1: 2016-08-26 07:46:19 ЛС | профиль | цитата


Редактировалось 1 раз(а), последний 2016-08-29 07:20:46
карма: 0

0
Ответов: 16884
Рейтинг: 1239
#2: 2016-08-26 15:12:13 ЛС | профиль | цитата

Add(MainForm,2953706,42,42)
{
}
Add(Button,2003162,98,42)
{
Left=15
Top=20
Width=75
Caption="Показать"
Data=Integer(1)
link(onClick,403168:doWork1,[(163,48)])
}
Add(Button,372602,98,98)
{
Left=15
Top=75
Width=75
Caption="Скрыть"
Data=Integer(0)
link(onClick,403168:doWork3,[(163,104)])
}
Add(ChildGroupBox,9959225,196,56)
{
}
BEGIN_SDK
Add(EditMulti,4070939,21,21)
{
WorkCount=1
Height=326
link(doWork1,1499530:doVisible,[(28,27)(28,111)])
}
Add(GroupBox,1499530,35,105)
{
Left=100
Top=10
Width=270
Height=245
Visible=1
Caption="Ввод и редактирование данных спортсмена"
Point(doVisible)
}
Add(Label,15452728,49,28)
{
Left=15
Top=25
Width=80
Height=160
Caption="Фамилия\r\n\r\nИмя\r\n\r\nОтчество\r\n\r\nДата рождения\r\n\r\nТелефон\r\n\r\nАдрес"
AutoSize=1
Alignment=1
}
Add(Edit,9825378,105,21)
{
Left=110
Top=24
Width=150
}
Add(Edit,16706875,98,49)
{
Left=110
Top=50
Width=150
}
Add(Edit,13535038,98,77)
{
Left=110
Top=76
Width=150
}
Add(Edit,165407,98,133)
{
Left=110
Top=127
Width=150
}
Add(DatePicker,5813766,98,105)
{
Left=110
Top=101
Width=150
Height=21
}
Add(Memo,13526116,98,161)
{
Left=110
Top=155
Width=150
Height=35
}
Add(Button,1658317,56,203)
{
Left=55
Top=205
}
Add(Button,16299197,168,203)
{
Left=170
Top=205
}
END_SDK
Add(HubEx,403168,159,56)
{
link(onEvent,9959225:doWork1,[])
}


--- Добавлено в 2016-08-26 16:35:41

Shuster, где ты берёшь sha-файлы без половины линков ?
http://forum.hiasm.com/getfile/28876

--- Добавлено в 2016-08-26 17:16:09


А вдоль дороги мертвые с косами стоят, и тишина...


Редактировалось 8 раз(а), последний 2016-08-28 18:42:41
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 72
Рейтинг: 0
#3: 2016-08-27 09:33:00 ЛС | профиль | цитата


Редактировалось 3 раз(а), последний 2016-08-29 07:20:35
карма: 0

0
Ответов: 16884
Рейтинг: 1239
#4: 2016-08-27 09:49:43 ЛС | профиль | цитата
1. Всегда проверяй что выкладываешь !

Нужно выкладывать в тегах "code"
2. В Project240.rar я только восстановил отсутствующие линки. Это самый простой пример использования SQLite.

Вот тебе shuster_пример .rar немного попроще.

Сидишь в теме - F5 нажимай почаще.

Tad писал(а):
В Project240.rar я только восстановил отсутствующие линки.
Оказалось - не все.

Редактировалось 15 раз(а), последний 2016-08-28 19:34:39
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
файлы: 1shuster_6.JPG [40.1KB] [1027]
Ответов: 72
Рейтинг: 0
#5: 2016-08-28 11:13:38 ЛС | профиль | цитата


Редактировалось 1 раз(а), последний 2016-08-29 07:20:59
карма: 0

0
Ответов: 16884
Рейтинг: 1239
#6: 2016-08-28 11:33:08 ЛС | профиль | цитата
shuster писал(а):
Но ответа так и нет или я коряво написал в предыдущем сообщение, что я пытаюсь понять и сделать?!
Как можно даже посмотреть, что ты выложил если выложил не в тегах "code" и оно всё битое ? Не то, что ответить.

На вопрос :
shuster писал(а):
а вот как сделать чтобы данные выводились из таблицы обратно в форму?!
Я тебе ответил здесь "Записная_книжка_ОК.rar"

Редактировалось 2 раз(а), последний 2016-08-28 11:35:40
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 72
Рейтинг: 0
#7: 2016-08-28 15:06:20 ЛС | профиль | цитата


Редактировалось 1 раз(а), последний 2016-08-29 07:21:06
карма: 0

0
Ответов: 16884
Рейтинг: 1239
#8: 2016-08-28 17:59:02 ЛС | профиль | цитата
Это же ты пишешь !
shuster писал(а):
но при нажатии на кнопку Edit ничего не происходит...
тут ничего не происходит
shuster писал(а):
При нажатии на кнопку Edit, в Записной книжке, появляется форма с введенными данными из выбранной строки таблицы.
а тут оказывается появляется форма.
Так в чем проблема ? Если появляется, то редактируй эти данные и жми ОК.

Выложенные тобой примеры - БИТЫЕ !
Что их нельзя перезалить ?

А откуда там взялась кнопка EDIT ? Ведь формы для EDIT я не видел.

--- Добавлено в 2016-08-28 19:13:54

Попробуй вот этот прицеп (в новой папке) и по-редактируй свои посты (замени битые портянки и спрячь их)

Редактировалось 16 раз(а), последний 2016-08-28 19:51:33
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
файлы: 1Записная_книжка_NEW.rar [3.2KB] [391]
Ответов: 72
Рейтинг: 0
#9: 2016-08-28 20:32:09 ЛС | профиль | цитата


Редактировалось 1 раз(а), последний 2016-08-29 07:21:16
карма: 0

0
Ответов: 16884
Рейтинг: 1239
#10: 2016-08-28 20:35:58 ЛС | профиль | цитата
У меня 20:36, а у тебя уже наверное за полночь ?
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 72
Рейтинг: 0
#11: 2016-08-28 20:47:19 ЛС | профиль | цитата
у меня почти час ночи...
карма: 0

0
Ответов: 16884
Рейтинг: 1239
#12: 2016-08-28 22:21:18 ЛС | профиль | цитата
Давно спать пора.

Вот окончательный вариант "Записной книжки"
Что добавлено:
1. При переходе в режим ввода - раскладка клавиатуры автоматически переключается на русский.
2. Фамилия и имя приводятся в божеский вид. (Иванов, а не иВАНОВ и не иВаНоВ)
3. Работать можно без мышки. Переход между окнами - Tab
4. Открыть ComboBox-сы Alt+стрелка вниз
5. Выбор Стрелка вниз\вверх. Конец выбора Enter
6. Переход по полям ввода - Tab.
7. Нажать кнопку - Пробел
8. При открытии в окне записи БД , кнопка в режиме "Удалить". Если началось редактирование
кнопка переходит в режим "Сохранить"
9. Так как Ивановых Иванов может быть много, то в ComboBox выбора выводится и номер телефона.

Ответы на вопросы
Завтра на работе до 14:00 МСК. Все вопросы после 15:00

Редактировалось 4 раз(а), последний 2016-08-28 22:36:31
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
файлы: 1Записная_книжка_NEW_2.rar [3.5KB] [343]
Разработчик
Ответов: 26073
Рейтинг: 2122
#13: 2016-08-28 22:58:36 ЛС | профиль | цитата
Tad писал(а):
Завтра на работе до 14:00 МСК. Все вопросы после 15:00

Ты все еще на работу ходишь, в твоем-то возрасте?
карма: 22

0
Ответов: 16884
Рейтинг: 1239
#14: 2016-08-29 07:20:06 ЛС | профиль | цитата
Нормальный возраст.
nesco, компонент StrCase. Я бы добавил вначале Trim(Str); Ну очень многие начинают печатать с Пробела (иногда с нескольких)
procedure THIStrCase.FirstChar;
begin
CharLower(@Str[1]);
CharUpperBuff(@Str[1], 1);
end;

Редактировалось 2 раз(а), последний 2016-08-29 07:25:08
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 72
Рейтинг: 0
#15: 2016-08-29 08:22:10 ЛС | профиль | цитата
Убрал лишние сообщения. Начну с нуля.
Есть file1.rar в нем схема справочника, на основе которого я бы хотел, чтобы было так file2.rar
При нажатии на Add данные добавляются и только часть их становится видна в обще таблице.
При нажатии на Delete удаляется только выбранные данные, включая и те что не видны.
При нажатии на Edit открывалась бы форма аналогичная Add, но с уже имеющимися данными исходя из выбранной строки в общей таблице.

Пробовал Edit сделать через UPDANE, но там надо, как я понял, задавать точные значения строк, но мне они не известны, т.к. я же не знаю сколько у меня в итоговой таблице получится данных. Подумал, что может через INSERT должна идти команда, но что-то я не то написал и в итоге не стало работать вообще.
Объясните, как сделать правильно схему?!
PS даю ссылки: http://forum.hiasm.com/getfile/37723 http://forum.hiasm.com/getfile/37724

PSS если не трудно, объясните как сделать чтобы удаление происходило, например, по телефону, дому или имени?
замена DELETE FROM note where LastName='%1' на например DELETE FROM note where Name='%2' ничего не дает.

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

Редактировалось 4 раз(а), последний 2016-08-29 11:11:05
карма: 0

0
Сообщение
...
Прикрепленные файлы
(файлы не залиты)