Iniciante em Delphi

[Eduardo Silva H. 0]

Olá, me chamo Eduardo, tenho 17 anos e estou começando a trabalhar em uma empresa que necessita de um programador em Delphi, entrei na empresa para aprender e futuramente ajudar a desenvolver o sistema, porém o estudo é por minha conta pois o programador atual não pode parar para ficar me ensinando, enfim, não sei muito sobre o Delphi e o chefe pediu para que eu estudasse sobre Report Builder, alguém pode me dar algumas dicas? um site? como posso incluir o RB como componente do Delphi? Abraços.

[adrianno 7]

Report builder tem um instaldor automatico para todas as versoes do delphi a partir da 7

porem é um componente pago e caro até, no site dele existe manual, downloads trial etc

 

Pagina do Report builder download trial

 

Pagina com manuais - ingles

 

[Eduardo Silva H. 0]

Então, eu baixei aqui o Report Builder 3.0, já fiz a instalação porém ele abre por fora do Delphi.

[adrianno 7]

amigo baixe a versao mais nova 11 ou 12 acho, mais voce tem que abrir ele dentro do delphi usar ele como componente dentro do delphi, no seu caso é o mais correto, recomendado, pois dentro do delphi você usa ele junto com as consultas aos dados , datasources etc, reportbuilder 3 é muito antigo cara

[Eduardo Silva H. 0]

Aqui usamos o Delphi 7, as versões mais novas funcionam no delphi 7? o RB 3.0 eu consegui botar como componente.

[adrianno 7]

sim amigo existe versao 12 do report builder , para qualquer versar do delphi da 7 em diante

[Eduardo Silva H. 0]

Você conhece algum site que disponibiliza apostilas/video aulas gratis em PT sobre o RB?

[adrianno 7]

Não senhor, apenas o video do youtube que te indiquei, o professor Neri mostra bastante coisa sobre o RB

basta olhas no lado os videos relacionados, ele monta um relatorio simples, que serve como base

[Eduardo Silva H. 0]

beleza, vou dar uma olhada nos videos, mas tarde se tiver alguma dúvida volto a perguntar, obrigado pela ajuda Adriano, abraços.

 

Estou fazendo um programa para cadastro de clientes para poder fazer relatorios sobre ele,

 

http://imageshack.us/f/833/delphi.jpg

 

E o banco de dados estou criando, porém não sei muito bem sobre o IBExpert e queria umas dicas sobre o que botar nele:

http://imageshack.us/photo/my-images/805/delphi2.jpg/

[wllf 2]

Colega segue um conselho primeiro aprenda o básico sobre a linguagem para depois trabalhar com gerador de relatórios, senão você vai ficar perdido ...

[Eduardo Silva H. 0]

Já consegui fazer o programa + gerar o relatorio, porém agora queria uma ajuda nisso:

 

O sistema atual aqui da empresa é um sistema comercial integrado, e ele não avisa quando um produto está acabando/em falta, alguém pode me falar como posso projetar algo que de as seguintes opções a pessoa:

1º Checkbox com a opção de escolher alertar quando um produto estiver acabando

2º Um edit para que possa ser escolido a quantidade sendo a minima 0

3º Um alerta quando a quantidade de estoque estiver = a quantidade escolida pela pessoa.

 

PS: Sei que muitos vão falar para ler o básico etc, mas o problema é que estou trabalhando para uma empresa que necessita disso com urgencia, o "essencial" que é gerar relatorio já consegui aprender, agora só falta os toques finais para terminar a "primeira parte"... Abraços.

[Eduardo Silva H. 0]

Não consegui editar o post acima, fiz o aplication e ficou assim:

unit Unit1;

 

interface

 

uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

Dialogs, Grids, DBGrids, DB, DBTables, IBCustomDataSet, IBTable,

IBDatabase;

 

type

TForm1 = class(TForm)

DBGrid1: TDBGrid;

IBDatabase1: TIBDatabase;

IBTransaction1: TIBTransaction;

DataSource1: TDataSource;

IBTable1: TIBTable;

procedure DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;

DataCol: Integer; Column: TColumn; State: TGridDrawState);

private

{ Private declarations }

public

{ Public declarations }

end;

 

var

Form1: TForm1;

 

implementation

 

{$R *.dfm}

 

procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;

DataCol: Integer; Column: TColumn; State: TGridDrawState);

begin

if (Column.Field.FieldName = 'UNIDADE') then

begin

if IBTable1.FieldByName ('ESTOQUE_ATUAL').Value < 0 then

begin

DBGrid1.Canvas.Font.Color:= clRed;

DBGrid1.Canvas.FillRect(Rect);

DBGrid1.DefaultDrawColumnCell(Rect, DataCol, Column, State);

end

else

begin

DBGrid1.Canvas.Font.Color:= clBlack;

DBGrid1.Canvas.FillRect(Rect);

DBGrid1.DefaultDrawColumnCell(Rect, DataCol, Column, State);

end;

end;

end;

 

end.

 

Fiz um DBGrid1, DataSource1, IBTable1, IBTransaction1, IBDatabase1

 

DBgrid1 ligado ao DataSource 1 com o seguinte comando no OnDrawColumnCell:

begin

if (Column.Field.FieldName = 'UNIDADE') then

begin

if IBTable1.FieldByName ('ESTOQUE_ATUAL').Value < 0 then

begin

DBGrid1.Canvas.Font.Color:= clRed;

DBGrid1.Canvas.FillRect(Rect);

DBGrid1.DefaultDrawColumnCell(Rect, DataCol, Column, State);

end

else

begin

DBGrid1.Canvas.Font.Color:= clBlack;

DBGrid1.Canvas.FillRect(Rect);

DBGrid1.DefaultDrawColumnCell(Rect, DataCol, Column, State);

end;

end;

end;

 

end.

 

O DataSorce1 ligado ao IBTable1.

O IBTable1 com TableName PRODUTOS ligado ao IBDatabase1.

O IBDatabase1 com DatabaseName

 

C:\Documents and Settings\usuario\Desktop\ESTOQUE1.GDB

 

ligado ao IBTransaction1.

O IBTranscation1 ligado ao IBDatabase1.

 

Quando eu aperto F9 para rodar o programa, que eu boto um número, ele fica em vermelho, eu queria fazer um jeito que a pessoa pudesse escolher a quantidade para ficar em vermelho, e não todos os números.. alguém pode me ajudar? Abraços.

 

EDIT: Consegui fazer o que está acima /\

 

Agora estou com a seguinte duvida:

 

Estou criando uma aplicação de avisar quando um produto estiver em falta no estoque, e botei um Edit+Checkbox para que a pessoa possa escolher se deseja a opção de informar, funcionara assim:

No DBGrid tem os produtos e uma Columns ESTOQUE_ATUAL, do lado tem um checkbox que quando você ativa aparece um Edit, queria saber se tem como fazer com que o que foi escrito no Edit altere o que está no ESTOQUE_ATUAL do field selecionado. Abraços.