Search options (Page 2 of 5)

Много Благодаря

само преглед

в таблица 2 да остане само едно име "иван"  ,а цифрите да бъдат сумирани
табл1   иван 5
              иван 10

табл2  иван 15

благодаря

Много Благодаря Дмитрий...работи

Здравейте,имам следния проблем:

procedure CalculateTotal10;
begin
frmZak.edZbor.Value :=sqrt(((frmZak.edFia.Value)*(frmZak.edFia.Value)*3.14/4 +(frmZak.edFib.Value)*(frmZak.edFib.Value)*3.14/4 )*4/3.14); // calculate
end;      работи

procedure CalculateTotal10;
begin
frmZak.edZbor.Value :=FormatFloat('###,###,##0.#00',sqrt(((frmZak.edFia.Value)*(frmZak.edFia.Value)*3.14/4 +(frmZak.edFib.Value)*(frmZak.edFib.Value)*3.14/4 )*4/3.14)); // calculate
end;   не работи

здравейте,този проект работи само със цели числа,може ли да се поправи да работи и със десетични (например 25,45)
благодаря

здравейте, в TableGrid1 към всяко име има присвоени няколко записа...например:
Иван Иванов    Януари         50
Иван Иванов    Февруари    40
Петър Петров   Януари        20
Петър Петров   Февруари    70
Петър Петров   Март              90
Как мога чрез натискане на бутон  в Таблицата да останат  само имената  от последния запис:

Иван Иванов  Февруари    40
Петър Петров Март            90
благодаря

здравейте не мога да се справя със следния проблем:
Form1.Edit4.Text := SQLExecute('SELECT (meseci) FROM zakaz WHERE zakaz.id_application='+IntToStr(Form1.TableGrid1.dbIndexToID(i))+' ORDER BY meseci DESC LIMIT 1');

искам в Edit4 да се показва  записа с най голямо Id (последния запис)
благодаря

здравейте,за съжаление използвам версия 1.51 за която имам лицензен ключ.Когато поставя версия 2.2 не мога да активирам ключа и имам период от 60 дни

здравейте,искам да добавам 1 месец,а не 30 дни,защото има месеци с 31 ден,а февруари с 28 и т.н.

Здравейте,при New record :
procedure Form1_Button22_OnClick (Sender: string; var Cancel: boolean);
begin
    if Form1.TableGrid1.dbItemID<>-1 then
    begin

   frmApplication.edClient.dbDefaultValue := SQLExecute ('SELECT clientname FROM application WHERE id =' + IntToStr(Form1.TableGrid1.dbItemID) +'' );  РАБОТИ
   
frmApplication.edPhone.dbDefaultValue := SQLExecute ('SELECT clientphone FROM application WHERE id =' + IntToStr(Form1.TableGrid1.dbItemID) +'' ); РАБОТИ
   
frmApplication.ComboBox3.dbItemID := SQLExecute('SELECT id_grad  FROM application  WHERE id='+IntToStr(Form1.TableGrid1.dbItemID) +'');  НЕ РАБОТИ

   frmApplication.ComboBox3.DoOnChange;
end;

end;

Ето какво имам предвид