![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
как определить - выделенна запись в таблице или нет
-=snoop=- © (2005-07-04 09:35:00)привет всем, есть грид у которого включен мультиселект, в цикле перебираю все записи, нужно отработать только те, которые выделенны, как это проверить?
Mike Kouzmine (2005-07-04 21:02:00) [1]получи из списка закладку, перейди на нее, удали запись и так до посинения.
Digitman (2005-07-04 13:50:00) [2]
> иаду
> те
> фсе
> типа
детский сад.
-=snoop=- (2005-07-04 13:36:00) [3]2 Digitman hjkdlshgl;s = это по французСки
пишет ошибку типа(( не значит КОНКРЕТНО, не значит В НАТУРЕ
это просто скромное "error type"
а иаду выпить нужно те,,,фсе же
Digitman (2005-07-04 13:28:00) [4]а по делу - задавай КОНКРЕТНЫЙ вопрос, с КОНКРЕТНЫМ же твоим " типа"
а не ту бредь, что ты сейчас несешь, вперемешку с доморощенным жаргоном
-=snoop=- (2005-07-04 13:20:00) [5]ну а по делу ничего...
Digitman (2005-07-04 13:04:00) [6]
> -=snoop=- © (04.07.05 13:01) [16]
на твое усмотрение
-=snoop=- (2005-07-04 13:01:00) [7]2 Digitman а может иаду выпить?
Digitman (2005-07-04 12:54:00) [8]
> Не могу
к терапевту.
> ругается
матерно ?
-=snoop=- (2005-07-04 12:45:00) [9]Не могу удалить выделенную строку,
form1.DBGrid1.SelectedRows.Delete
ругается
msguns (2005-07-04 12:05:00) [10]Веселая ветка ;)
-=snoop=- (2005-07-04 11:24:00) [11]не конкретно)) а "типа" ))
Digitman (2005-07-04 11:20:00) [12]
пишет
"Писатель ! Ильф и Петров !" (с)
> ошибку типа
типа типа"чиста канкретна" ?)
-=snoop=- (2005-07-04 11:14:00) [13]смотрел в F1 (((
сделал)))
Johnmen (2005-07-04 11:11:00) [14]Тут дело такое, либо париться, либо посмотреть пример в F1.
Кто что больше предпочитает...:)
Ega23 (2005-07-04 11:10:00) [15]
SaveLocation:=DMpas.RQPers.FieldByName('PersID').AsInteger;
With rxgPersonnel.DataSource.DataSet do
begin
try
DisableControls;
for i:=0 to rxgPersonnel.SelectedRows.Count-1 do
begin
Application.ProcessMessages;
GotoBookmark(Pointer(rxgPersonnel.SelectedRows.Items[i]));
ss:='exec S_SchedSpec @mode=51, @PersID='+
ValX(DMpas.RQPers.FieldByName('PersID').AsInteger,',')+
'@ModeFl='+ValX(ModeFl,',')+
'@UserPersID='+ValX(SessInfo.PersId,',')+'@UserWorkCod='+ValX(SessInfo.Workcod,',')+
'@DatOut='+ValX(DatOut);
QuExec(DMpas.RQTemp,ss);
end;
Locate('PersID',SaveLocation,[]);
finally
EnableControls;
end;//try
end;
rxgPersonnel.SelectedRows.Clear;
Вполне работающий код...
-=snoop=- (2005-07-04 11:03:00) [16]for i := 0 to DBGrid1.SelectedRows.Count-1 do
begin
GotoBookmark(pointer(form1.DBGrid1.SelectedRows.items[i])) ;
end;
пишет ошибку типа((
GotoBookmark, как нужно объявить как TDataSet или как? блин парюсь
Digitman (2005-07-04 10:27:00) [17]
> лишнее не выкинул из кода
и недовыкинул)
Johnmen (2005-07-04 10:25:00) [18]>ANB © (04.07.05 10:17) [4]
А.... :)
ANB (2005-07-04 10:17:00) [19]
> Johnmen © (04.07.05 10:01) [3]
- это я лишнее не выкинул из кода.
Johnmen (2005-07-04 10:01:00) [20]>ANB © (04.07.05 09:47) [2]
А в чём оптимальность ?
Зачем if ? Зачем Delete ?
Да и вообще, пример в F1 есть.