Lazarus unit declerasyonu

[Bulut]

Sorular:
1. Datamodel olan formu diğer formlarda uses komutu ile tanıtamadım. Normal formu tanıtıp showmodal komutu ile çalıştırdım. Datamodel komutumda database ve datasetler var onları birbaşka formda grid de tanıtmak istiyorum, olmuyor.
[/unit tasinirliste;

{$mode objfpc}{$H+}

interface

uses
Classes, SysUtils, LResources, Forms, Controls, Graphics, Dialogs, Buttons,
DbCtrls, DBGrids, jvuib;

type

{ Tfrtasinirliste }

Tfrtasinirliste = class(TForm)
DBGrid1: TDBGrid;

private
{ private declarations }
public
{ public declarations }
end;

var
frtasinirliste: Tfrtasinirliste;

implementation
{ Tfrtasinirliste }
uses dm;

initialization
{$I tasinirliste.lrs}

end.

]
kod bu. dm uniti datamodel formunun bulunduğu unit.
2. aşağıdaki kodda hata verdi
[/procedure TFrtasinirliste.FormKeyPress(Sender: TObject; var Key: Char);
begin
if Key = #13 then { Eğer Enter basılmışsa}
if not (ActiveControl is TDBGrid) then
begin// TDBGrid üzerinde değilse}
Key := #0; { }
Perform(WM_NEXTDLGCTL, 0, 0); { }
end
else
if (ActiveControl is TDBGrid) then// TDBGridd ise}
with TDBGrid(ActiveControl) do
if selectedindex < (fieldcount -1) then// Alanı bir arttır }
selectedindex := selectedindex +1
else
selectedindex := 0;
end;
]
Perform(WM_NEXTDLGCTL, 0, 0); { } satırını tanımadı.
3. Lazarus ile ilgili türkçe kaynak varmı. Kod kullanışı vb. konularda.
ingilizce example bile olsa faydalanabiliz. Sitesinden anlayacak kadar ing. yok.
Selamlar...

[selimr]

uses kısmına datamodulun unit ini eklersen tanıması lazım.. fakat delphide olduğu gibi özellikler penceresinde otomatik olarak görünmeyebilir..

formun create olayına aşağıdaki gibi birşey yazarak;
datasource1.DataSet := dm.squery;
datasource ni bağlayabilirsin..

2. Perform(WM_NEXTDLGCTL, 0, 0); { } satırını tanımadı.

uses kısmına windows ekle


3. aslında delphi kaynaklarından çok rahatlıkla faydalanabilirsin.. çok fark yok çünkü.

[Bulut]

değerli arkadaşım selimr siz galiba bu işi biliyorsunuz. O halde size sormaya devam edeyim, kurura bakmayın.
1. datasetin üzerine delphide sag tıklayıp add ile tüm alanları ekliyorduk, buruda da aynı işi yapabilirmiyiz, yoksa başka bir işlem ilemi bunu gerçekleştireceğiz, selamlar...

[selimr]

buradan

http://www.hu.freepascal.org/lazarus/

Lazarus-0.9.23-fpc-2.1.5-20070604-win32.exe yi indirirsen dediğini yapabilirsin..

[Bulut]

selim bey delphiden lazarus'a geçmek için daha çok sorularımız olacak galiba teşekkürler...

[selimr]

selim bey delphiden lazarus'a geçmek için daha çok sorularımız olacak galiba teşekkürler...

çok resmi oldu ya bulut.. ( bey )

elimden geldiğince memnuniyetle yardımcı olmaya çalışırım..