Natã Carlos

Deu certo, era problema nos componentes, só deletei o combobox e coloquei um novo.

Olá, estou tentando adicionar itens no combobox em tempo de execução, porém eles não aparecem, o código que estou usando é esse, uso Delphi 7. CB_cod_rec.Items.Clear; CB_cod_rec.Items.Add('5952'); CB_cod_rec.Items.Add('5987'); CB_cod_rec.Items.Add('8468'); CB_cod_rec.Items.Add('9385'); CB_cod_rec.Update;

vi um post dizendo que um DBgrid ligado a um Query que utiliza a expressão where ou order by não é possivel ser editável mesmo habilitando RequestLive. será que é isso que está impedindo de conseguir editar os dados na DBgrid, pois eu utilizo o orderby para ordenar as colunas quando são clicadas.

esse segundo comando aparece o seguinte erro: 'Q_Export: Cannot modify a read-only dataset'

Certo pessoal, ao clicar no titulo da coluna ele ordena, porém depois de ordenar ele não deixa alterar os dados, ainda estou sem solução.

sim estão dessa maneira, não sei bem como isso procede, mas quando eu ligo o DS a tabela, ai dá pra alterar, mas quando ligo o DS a query, ai não altera.

Olá Tenho um DBGrid que está ligado a um DataSource e este ligado a um Query, para ordenar ao clicar no titulo da coluna estou usando o seguinte código: procedure TForm1.DBG_exportTitleClick(Column: TColumn); var campo:string; begin campo:=column.fieldname; // CAMPO RECEBE O NOME DA COLUNA CLICADA, application.processmessages; // para considerar algo que aconteça no dbgrid durante a entrada nesta procedure DM.Q_Export.sql.clear; // LIMPA A QUERY DM.Q_Export.sql.add('select * from TB_export order by '+campo); // ESCREVE O SELECT COM O ORDER BY if not DM.Q_Export.Prepared then DM.Q_Export.Prepare; DM.Q_Export.Open; // ABRE A QUERY COM A ORDEM ESCOLHIDA. end; O problema é que não consigo alterar dados da tabela pelo DBGrid, para conseguir alterar tenho que ligar o DataSource direto na Tabela, mas ai não consigo ordenar o Grid. alguém pode me ajudar nisso??? gostaria de fazer as duas funções.

Já achei estranho por não encontrar aquele biblioteca em nenhum lugar, e mesmo depois de instalar todos aqueles acrobats e ainda não apareceram, tive que copiar, tá estranho isso. Mas obrigado pela ajuda até agora, vou tentar instalar em outro micro que tenha um windows completo, estou usando o Win 7 home nessa máquina, qualquer novidade irei postar aqui.

Ok, fiz a limpa, reinstalei o delphi mas continua dando erro, to começando a desconfiar que é o PDF que está com problema, será que por ele ter algumas figuras pode estar atrapalhando, fico em dúvida pois ele nem chega a abrir o aplicativo. Será que é a versão do meu Delphi??? Estou usando Delphi 7.0

Não sei se isso tem algo haver, mas quando vou em Project>Import Type Library>add e tento adicionar acrobat.tlb aparece um erro: Erro ao acessar o Registro OLE. Será que é isso o problema????

Fiz refenrencia a todos os acrobats, mas continua o mesmo erro. Vou postar meu código completo aqui. unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, Grids, DBGrids, DB, DBTables, Buttons, StrUtils, ComCtrls, ExtCtrls, ExcelXP, OleServer, ShellAPI, PDF, OleCtrls, AcroPDFLib_TLB, ActiveX, acrobat_tlb; type TForm1 = class(TForm) Label2: TLabel; Button2: TButton; Memo1: TMemo; OpenDialog1: TOpenDialog; Button3: TButton; DBGrid2: TDBGrid; Button5: TButton; RGLayout: TRadioGroup; DBG_export: TDBGrid; GroupBox1: TGroupBox; Label4: TLabel; Label8: TLabel; Label9: TLabel; Label10: TLabel; Label11: TLabel; Label5: TLabel; Label6: TLabel; Label7: TLabel; Label12: TLabel; Button1: TButton; SaveDialog1: TSaveDialog; EDT_Hist_venda_cred: TEdit; EDT_Hist_venda_debi: TEdit; EDT_Hist_desp_cred: TEdit; EDT_Hist_desp_debi: TEdit; EDT_Hist_desp_cartao: TEdit; EDT_despesas: TEdit; EDT_cartao: TEdit; EDT_banco: TEdit; EDT_caixa: TEdit; GroupBox2: TGroupBox; CBProvisao: TCheckBox; CBDespesa: TCheckBox; CBPagamento: TCheckBox; procedure Button2Click(Sender: TObject); procedure Button3Click(Sender: TObject); procedure FormClose(Sender: TObject; var Action: TCloseAction); procedure FormCreate(Sender: TObject); procedure Button5Click(Sender: TObject); procedure Button1Click(Sender: TObject); private { Private declarations } public { Public declarations } end; var Form1: TForm1; implementation uses Unit5, ComObj; {$R *.dfm} {$TYPEDADDRESS OFF} procedure TForm1.Button3Click(Sender: TObject); var datavalida:boolean; TotalParc, QuantParc, Cont, Linhas, I,X,J,Y: Integer; Ano, ano2, ValorParc, ValorDesp, Parc, Caminho, Memo, Descricao, Data1, Data2, DataAnt, Numero1, Numero2, Numero3, ValorBru, ValorLiq: String; Stringlist2, StringList, DocImport: TStringList; Excel : Variant; Valor, SomaParc : Currency; CData: TDateTime; App,AVDoc:Variant; PDDoc: Acrobat_TLB.CAcroPDDoc; PDPage: Variant; PDHili: Variant; PDTextS: Variant; acrobat: Variant; Result: Boolean; NTL, i2, j2, Pagecount: Integer; zeilen: string; stichwortcounter: Integer; Size: Integer; gesamtstring: AnsiString; zwreal: Real; begin If OpenDialog1.Execute Then begin Caminho:= OpenDialog1.FileName; case RGLayout.ItemIndex of 0: App:=CreateOleObject('AcroExch.App'); App.Show; AVDoc:=App.GetActiveDoc; AVDoc.Open(OpenDialog1.filename,''); //seleciona tudo e copia para o clipboard App.MenuItemExecute('Edit'); App.MenuItemExecute('SelectAll'); App.MenuItemExecute('Edit'); App.MenuItemExecute('Copy'); Memo1.PasteFromClipboard; App.Exit; end; end;

A coisa tá complicada. Instalei tudo em outro micro, todas as versões do adobe, mais o distiller, mas continua dando o mesmo erro. O adobe acrobat viewer, não tem jeito não consgui instalar em nenhuma máquina, mesmo instalando o Microsoft VM antes, não dá certo. Será que é por causa desse viewer que o sistema dá erro naquela linha????

Infelizmente ainda não está dando certo, será que não existe outro modo de incluir essa biblioteca??? O erro persiste. Project Project1.exe raised exception class EOleSysError with message 'Cadeia de caracteres de classe inválida'. Process stopped. Use Step ou Run to continue. nessa linha de código: App:=CreateOleObject('AcroExch.App'); Andei pesquisando nesse site e falam em instalar Adobe Acrobat Viewer, mas nem isso eu consigo, ele pede uma versão do Java e já tentei instalar todas, mas não vai. https://www.scriptbrasil.com.br/forum/lofiv...hp/t156472.html Agora que vi, acho que foi você mesmo que postou!!!!

Obrigado, consegui baixar o arquivo e coloquei na pasta C:/windows/system32, mas continua dando o mesmo problema. O que pode ser??

Sinceramente não sei o que está acontecendo, procurei pasta por pasta, fiz busca, desistalei a versão que eu tinha, instalei a versão que você passou o link, mas não acho esse arquivo!!!! Se não for pedir muito, você pode mandar esse arquivo por e-mail: natancarlos@hotmail.com Obrigado.