Delphi Forum

Arkadaşlar masa üstünden başka bir makinaya klasör oluştura biliyorum.

Ama küçük bir servis yazdım.Servisten başka bir makinaya klasör oluşturur ken "Kullanıcı adı veya parola hatalı." mesajı alıyorum.
Nasıl bir yol izlemem azım yardımcı olursanız sevinirim.
örnek kod

public void KalsorOlustur ...

yaptım olmadı

memo2 datalarım şöyle

22903
6.14
22902
0.12
22901
0.09
12702
2.91
12701
0.11
868588
No Result
33102
No Result
33101
0.08
867684
0.07
868892
0.07
868908
0.09
869506
0.08

MEMO2 çift satır olanlarını tablemdeki NO alanına tek olanlarıda SONUC alanına yazdırmak istiyorum şöyle ...

TOracleSeession,TOracleDataset companet lerin nasıl bulu bilirim

TServerSocket ,Tconp diye kopenetleri nasıl yüklerim

elimde birtane txt dosyası var ben b
unun içindeki Örnek No bulup memo1 yazdırmak istiyorum bunu nasıl yapa bilirim

Write 11.06.2007 14:03:38 <SOH>#-YK<CR>
Sys 11.06.2007 14:03:38 Haberleşme Sonu
Read 11.06.2007 14:03:38 <SOH>#-B4<CR>
Write 11.06.2007 14:03:37 <SOH>#,YJ<CR>
Sys 11.06.2007 14:03:37 ...

procedure TForm1.Edit1Exit(Sender: TObject);
var
gun:AnsiString;
ay:AnsiString;
yil:AnsiString;

begin

gun:=copy(datetostr(date),1,2);
ay:=copy(dateTostr(date),4,2);
yil:=copy(dateTostr(date),7,4);
edit1.text:=gun+'.'+ay+'.'+yil

end;

end.

Böyle yaptım ama bana Edit1.text girilen degilde sistemin ...

edit1.text tarih girmek istiyorum amam 01022007 şeklinde girdiginme aralarına otomatik nokta koysun bunu hangi fonksiyonla yaparım yada örnek vere bilirmisiniz ama maksedit kulanmadan yapmak istiyorum

hocam Properties EditMaks Buttona Tıklıyorum Açılan pencereden _ siliyorum kaydetikten sonra yine gözüküyor

programı run yapınca MaskEdit _._.__ çizgileri gözükmemesini istiyorum
nasıl kaldıra bilirim

arkadaşlar lütfen soruma cevap yazarsanız sevinirim

CREATE TABLE CIHAZ
(
C_NO NUMBER,
CIHAZ_ADI VARCHAR2(20 BYTE)
);

böyle bir tablem var ben ekrana iki tana edit1.text ve edit2.text yerleştirdim

edit1.text c_no sunu girdimmi CIHAZ_ADI adını edit2.text göstersin
bunu select cihaz_adi from cihaz where c_no=:Edit1.text gibi birşey yapmak istiyorum ...

ADOQuery1.sql.Clear;
ADOQuery1.sql.add('insert into ONARIM_BILGI');
ADOQuery1.sql.add('(O_NO,M_NO,M_ADI,O_GEL_TAR,O_MARKA,O_CINSI,O_SERINO,O_BILGI,O_TES_TAR,O_UCTIP)');
ADOQuery1.sql.add('values(:edit1,:edit2,:edit3,:edit4,:edit5,:edit6,:edit7,:Memo1,:edit8,:ComboBox2)');

ADOQuery1.Parameters ...

CREATE TABLE ONARIM_BILGI
(
O_NO NUMBER,
M_NO NUMBER DEFAULT NULL,
M_ADI VARCHAR2(20 BYTE) DEFAULT NULL,
O_GEL_TAR DATE,
O_TARIH DATE,
O_TES_TAR DATE,
O_TIP NUMBER DEFAULT NULL,
O_CIHAZ VARCHAR2(20 BYTE) DEFAULT NULL,
O_MARKA VARCHAR2(20 BYTE) DEFAULT NULL,
O_CINSI VARCHAR2(20 BYTE ...

ORA-00936 missing exspression HATASI VERİYOR

HOCAM BUNU BAŞKA TÜRLÜ YAPAMAMMI
AMA
İNSERT İNTO KULANARAK BAŞKA YÖNTEMİ VARMI
BU ARADA ORACLE VERİTABANI KULANIYORUM